File size distribution: Difference between revisions

Content added Content deleted

Inline

@@ Line 331: / Line 331: @@
     my $bar-size = 80;
     say "File size distribution in bytes for directory: $dir\n";
+    for 0 .. %fsize.keys.max {
-    say sprintf( "# Files @     0b %8s: ", %fsize{0} // 0 ),
-        histogram( $max, %fsize{0} // 0, $bar-size );
+          say sprintf( "# Files @ %5sb %8s: ", $_ ?? "10e{$_-1}" !! 0, %fsize{$_} // 0 ),
-    for 1 .. %fsize.keys.max {
-          say sprintf( "# Files @ %5sb %8s: ", "10e{$_-1}", %fsize{$_} // 0 ),
               histogram( $max, %fsize{$_} // 0, $bar-size )
     }