# New Ticket Created by Christian Bartolomaeus # Please include the string: [perl #130529] # in the subject line of all future correspondence about this issue. # <URL: https://rt.perl.org/Ticket/Display.html?id=130529 >
With rakudo commit 3c52aa096c Seq got it's own join method. For some reason that changed the behaviour of 'redo' in 'grep': < bartolin> m: my $attempts = 0; say (1..5).grep({if $_ == 3 {$attempts++; redo unless $attempts == 10}; $_}).join("|"); say "looked $attempts times for element 3" < camelia> rakudo-moar f6303d: OUTPUT«1|2|4|5looked 1 times for element 3» < bartolin> star-m: my $attempts = 0; say (1..5).grep({if $_ == 3 {$attempts++; redo unless $attempts == 10}; $_}).join("|"); say "looked $attempts times for element 3" < camelia> star-m 2016.10: OUTPUT«1|2|3|4|5looked 10 times for element 3» Further discussion here: https://irclog.perlgeek.de/perl6-dev/2017-01-08#i_13878701