Select Code to Download

                   Rate Algorithm::Loops             glob     Nested l
+oops
Algorithm::Loops  371/s               --             -88%             
+-91%
glob             3059/s             724%               --             
+-27%
Nested loops     4219/s            1036%              38%             
+  --

 #!/usr/bin/env perl
 
 use warnings;
...
                      join(',',@size).'}{'.
                      join(',',@col).'}';
 }