[perl #58280] Speed lost on /^(foo|bar|baz)$/ match

Here are the 5.19.10+ blead numbers on a Linux box:

                Rate     regex regex_opt        eq
regex      7650757/s        --       -1%      -84%
regex_opt  7717895/s        1%        --      -84%
eq        48383994/s      532%      527%        --


And if we change $token to 'read', we get

                Rate     regex regex_opt        eq
regex      7748530/s        --       -2%      -62%
regex_opt  7899967/s        2%        --      -61%
eq        20146179/s      160%      155%        --


-- 
Karl Williamson

• [perl #58280] Speed lost on /^(foo|bar|baz)$/ match by Karl Williamson via RT
• Re: [perl #58280] Speed lost on /^(foo|bar|baz)$/ match by Dave Mitchell
• Re: [perl #58280] Speed lost on /^(foo|bar|baz)$/ match by demerphq