[perl #109672] [BUG] <!> in regexes doesn't fail in Rakudo

# New Ticket Created by  "Carl Mäsak" 
# Please include the string:  [perl #109672]
# in the subject line of all future correspondence about this issue. 
# <URL: https://rt.perl.org:443/rt3/Ticket/Display.html?id=109672 >


<skids> rakudo: say "aaa" ~~ m/ a [ a <!> ]? a /;
<p6eval> rakudo ce5cca: OUTPUT«=> <aaa>␤␤»
<skids> Which is correct, of course.
<skids> (I think?)
<skids> wait, shouldn't that above response be "aa" not "aaa"?
<moritz> you're right
<moritz> nom: say so 'a' ~~ /<!>/
<p6eval> nom ce5cca: OUTPUT«True␤»
<moritz> oh
<moritz> it seems that <!> doesn't work :/
<skids> Well, it has to work in some sense, because I'm using it
effectively elsewhere I think.
<moritz> if it worked, the above would have said 'False' and not 'True'
<TimToady> nom: say so 'a' ~~ /<!{1}>/
<p6eval> nom ce5cca: OUTPUT«False␤»
<TimToady> nom: say so 'a' ~~ /<!{0}>/
<p6eval> nom ce5cca: OUTPUT«True␤»
* masak submits rakudobug

The last two evaluations are correct, AFAIK. The first two should
yield "aa", and "False".

• [perl #109672] [BUG] <!> in regexes doesn't fail in Rakudo by Carl Mäsak