Help for this page

Select Code to Download

Select or download this

$ perl testGreed.pl
Benchmark: running greedyLong, greedyShort, notGreedyLong, notGreedySh
+ort,
...
greedyShort     88692/s          110%           93%            --     
+      -13%

notGreedyShort 101594/s          140%          121%           15%     
+        --

Select or download this

#!/usr/bin/perl -w

...
            notGreedyLong => \&notGreedyLong,
        }
     );