# HG changeset patch # User Heiko Schlittermann (JUMPER) # Date 1311577127 -7200 # Node ID 6bc08224c44e52196d47ff330654bf969ae821d7 # Parent a508df65c738d6357803b1c9be862f13daf1efbc progress output diff -r a508df65c738 -r 6bc08224c44e imager --- a/imager Sun Jul 24 22:43:08 2011 +0200 +++ b/imager Mon Jul 25 08:58:47 2011 +0200 @@ -96,7 +96,7 @@ local $SIG{ALRM} = sub { my $speed = ($stats{written} + $stats{skipped}) / (time - $^T + 1); - say sprintf "# done %4.1f%% | %24s (%*d of $stats{todo}, written %*d, skipped %*d)", + say sprintf "# done %5.1f%% | %24s (%*d of $stats{todo}, written %*d, skipped %*d)", 100 * (($stats{written}+$stats{skipped})/$stats{todo}), ($speed ? (scalar localtime($^T + $stats{todo} / $speed)) : ""), length($stats{todo}) => $stats{written} + $stats{skipped},