Permalink
Browse files

ux: By default display program runtime in secs, but module load time …

…in ms
  • Loading branch information...
1 parent 36c16fd commit c0cfc437157caa7c6e971942d881e908cc2ba577 Steven Haryanto (on PC) committed Jul 27, 2012
Showing with 3 additions and 3 deletions.
  1. +3 −3 lib/Devel/EndStats.pm
View
6 lib/Devel/EndStats.pm
@@ -125,7 +125,7 @@ END {
if ($begin_success) {
- $stats .= sprintf "# Program runtime duration: %.6fs\n", $secs;
+ $stats .= sprintf "# Program runtime duration: %.3fs\n", $secs;
my $files = 0;
my $lines = 0;
@@ -165,8 +165,8 @@ END {
for my $r (sort $sortsub keys %inc_info) {
next unless $inc_info{$r}{lines};
$inc_info{$r}{time} ||= 0;
- $stats .= sprintf "# #%3d %5d lines %.6fs(%3d%%) %s (loaded by %s)\n",
- $inc_info{$r}{order}, $inc_info{$r}{lines}, $inc_info{$r}{time}, $secs ? $inc_info{$r}{time}/$secs*100 : 0,
+ $stats .= sprintf "# #%3d %5d lines %7.3fms(%3d%%) %s (loaded by %s)\n",
+ $inc_info{$r}{order}, $inc_info{$r}{lines}, $inc_info{$r}{time}*1000, $secs ? $inc_info{$r}{time}/$secs*100 : 0,
$r, $inc_info{$r}{caller};
}
}

0 comments on commit c0cfc43

Please sign in to comment.