Select Code to Download

#!/usr/bin/env perl

...

    return $path;
}

1..4
ok 1
ok 2
ok 3
ok 4

             Rate  regex1  regex0 rindex0 rindex1
regex1   809214/s      --     -7%    -69%    -75%
...
regex0   877972/s      6%      --    -66%    -73%
rindex0 2579110/s    212%    194%      --    -21%
rindex1 3260240/s    294%    271%     26%      --