# New Ticket Created by Aleks-Daniel Jakimenko-Aleksejev # Please include the string: [perl #132294] # in the subject line of all future correspondence about this issue. # <URL: https://rt.perl.org/Ticket/Display.html?id=132294 >
Code: my $a = rx/aaaaaab/; 'a' x 999999 ~ 'b' ~~ /$a/; say now - INIT now ¦«2015.12»: 5.21453528 ¦«2016.06»: 2.98116495 ¦«2016.12»: 4.7695178 ¦«2017.06»: 4.2054743 ¦«f72be0f130cf»: 3.93059297 Possible IRC discussion: https://irclog.perlgeek.de/perl6-dev/2017-08-24#i_15066525 The time swings back and forth but there's a clear regression (from <3 seconds to >4). Bisectable points at (2016-09-14) https://github.com/rakudo/rakudo/commit/c3b044df16957057ff2d64297f3bcdbdbad622a1