On 4/27/07, Brad Bowman <[EMAIL PROTECTED]> wrote:
I would expect a different ordering. Perhaps the ".*" should be ".*?" or the output "bracadabr bracad brac br cadabr cad c dabr d br" ? The :overlap example follows this order.
You're probably right about that: $ perl5.9.5 -E 'my @m; "abracadabra" ~~ m/ a (.*?) a (?{ push @m, $1 }) (*FAIL) /x; say "@m"' br brac bracad bracadabr c cad cadabr d dabr br $ perl5.9.5 -E 'my @m; "abracadabra" ~~ m/ a (.*) a (?{ push @m, $1 }) (*FAIL) /x; say "@m"' bracadabr bracad brac br cadabr cad c dabr d br