$ perl5.20 foo
                       Rate end_of_substring   all tr_and_end end_slurped tr_and_match while split tr_and_split_redux tr_and_split tr_moar_magic   tr
end_of_substring     2752/s               --  -13%       -27%        -28%         -42%  -49%  -77%               -95%         -96%          -96% -98%
all                  3159/s              15%    --       -16%        -17%         -33%  -42%  -74%               -94%         -95%          -95% -97%
tr_and_end           3759/s              37%   19%         --         -2%         -20%  -31%  -69%               -93%         -94%          -94% -97%
end_slurped          3828/s              39%   21%         2%          --         -19%  -30%  -68%               -93%         -94%          -94% -97%
tr_and_match         4728/s              72%   50%        26%         23%           --  -13%  -61%               -91%         -92%          -93% -96%
while                5432/s              97%   72%        44%         42%          15%    --  -55%               -90%         -91%          -92% -95%
split               12019/s             337%  281%       220%        214%         154%  121%    --               -78%         -81%          -82% -89%
tr_and_split_redux  55249/s            1908% 1649%      1370%       1343%        1069%  917%  360%                 --         -12%          -15% -51%
tr_and_split        62500/s            2171% 1879%      1563%       1533%        1222% 1051%  420%                13%           --           -4% -44%
tr_moar_magic       65359/s            2275% 1969%      1639%       1607%        1282% 1103%  444%                18%           5%            -- -42%
tr                 112360/s            3983% 3457%      2889%       2835%        2276% 1969%  835%               103%          80%           72%   --