--- libcatalyst-perl-5.80005.orig/lib/Catalyst.pm +++ libcatalyst-perl-5.80005/lib/Catalyst.pm @@ -1647,7 +1647,7 @@ } if ($c->use_stats) { - my $elapsed = sprintf '%f', $c->stats->elapsed; + my $elapsed = $c->stats->elapsed; my $av = $elapsed == 0 ? '??' : sprintf '%.3f', 1 / $elapsed; $c->log->info( "Request took ${elapsed}s ($av/s)\n" . $c->stats->report . "\n" );