http://www.perlmonks.org?node_id=1099627


in reply to Re: Rakudo Perl 6 and MoarVM Performance Advances
in thread Rakudo Perl 6 and MoarVM Performance Advances

That's not great indeed. I don't really hope this will make much of a difference, but you did not have to capture the match with parenthesis. You could have just used $/:

perl6 -n -e 'say $/ if m/<<\w**5>>/' logs.txt

On the other hand, even if this does make a difference, the optimizer should have converted it automatically.