Select Code to Download

sub ikegami3x {
    local $_ = ":$_[0]:";
...
    /$re/;
    return @rv;
}

sub rhesa2 {
    my @kw = split /:/, $_[0];
...
        join ':', @ar;
    } ( 1 .. 2**@kw - 1 );
}

source: horse:cow:dog:cat
             Rate  ruzam  ikegami3  ikegami2  ikegami3x  rhesa2  rhesa
...
rhesa2    6023/s   269%   20%       17%      --        -9%       -9%
ikegami3x 6614/s   305%   32%       28%     10%         --       -0%
ikegami3  6634/s   307%   32%       29%     10%         0%        --