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

…in ms
perlancar · Jul 27, 2012 · c0cfc43 · c0cfc43
1 parent 36c16fd
commit c0cfc43
Showing 1 changed file with 3 additions and 3 deletions.
diff --git a/lib/Devel/EndStats.pm b/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};
             }
         }