# New Ticket Created by Gilbert R. Roehrbein
# Please include the string: [perl #68854]
# in the subject line of all future correspondence about this issue.
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=68854 >
BUG:
$ perl6
> say '(foo)' ~~ /'(' ~ ')' .*?/
Unable to parse , couldn't find final ')'
in regex PGE::Grammar::_block21 (<unknown>:1)
called from Main (<unknown>:1)
TEST:
ok( '(foo)' ~~ /'(' ~ ')' .*?/ )
The problem is .*? , i think, cause '(foo)' ~~ /'(' ~ ')' 'foo'/
matches. The bug was introduced between June 30 and today, cause similar
code is used in http://github.com/krunen/xml/tree/master, last updated
June 30
parrot rev: 40852
rakudo rev: 7666e92876576ce0dc9b1f5b8a5f035e78a80e81
