Select Code to Download

use strict;
use warnings;
...
 die unless 5 == grep $_>0, @invocation;
 
 cmpthese $results;

42598 1157019 1349175 990717 1135313
                    Rate word_altn list_util_index list_util_regex blo
+ck_grep expr_grep
...
list_util_regex 299705/s     2835%              9%              --    
+    -8%      -13%
block_grep      325087/s     3083%             19%              8%    
+     --       -5%
expr_grep       342754/s     3256%             25%             14%    
+     5%        --