$ perl foo
                      Rate end_of_substring tr_and_end end_slurped   all tr_and_match while split tr_and_split_redux tr_and_split tr_moar_magic   tr
end_of_substring    2634/s               --       -18%        -18%  -23%         -39%  -58%  -77%               -95%         -96%          -96% -97%
tr_and_end          3194/s              21%         --         -1%   -7%         -26%  -49%  -72%               -94%         -95%          -95% -97%
end_slurped         3227/s              23%         1%          --   -6%         -25%  -48%  -72%               -94%         -95%          -95% -97%
all                 3419/s              30%         7%          6%    --         -21%  -45%  -70%               -94%         -94%          -94% -97%
tr_and_match        4325/s              64%        35%         34%   27%           --  -30%  -62%               -92%         -93%          -93% -96%
while               6207/s             136%        94%         92%   82%          44%    --  -46%               -89%         -90%          -90% -94%
split              11416/s             333%       257%        254%  234%         164%   84%    --               -79%         -81%          -82% -88%
tr_and_split_redux 54054/s            1952%      1592%       1575% 1481%        1150%  771%  374%                 --          -9%          -13% -45%
tr_and_split       59172/s            2147%      1753%       1734% 1631%        1268%  853%  418%                 9%           --           -5% -40%
tr_moar_magic      62112/s            2258%      1845%       1825% 1717%        1336%  901%  444%                15%           5%            -- -37%
tr                 99010/s            3659%      3000%       2968% 2796%        2189% 1495%  767%                83%          67%           59%   --