# New Ticket Created by Moritz Lenz # Please include the string: [perl #75484] # in the subject line of all future correspondence about this issue. # <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=75484 >
'a b c d' ~~ /:s [(\w) <alpha> ]+/; say $0.WHAT; say $0.elems; say $<alpha>.WHAT; say $<alpha>.elems; say $/; Produces randomly either Array() 2 Match() 1 a b c d or Array() 2 Array() 2 a b c d (second output is correct). It even randomly alternates when I call it with parrot --hash-seed 0 perl6.pbc $file This bug manifests itself in S05-capture/caps.t.