Select Code to Download

#!/usr/bin/env perl

...
    alternation     => \&alternation,
    any             => \&sany,
});

                  Rate        grep         any alternation       table
grep            4055/s          --        -28%       -100%       -100%
any             5641/s         39%          --       -100%       -100%
alternation  3440637/s      84745%      60895%          --        -93%
table       48177809/s    1187946%     853994%       1300%          --