Nowadays this no longer says "pwnd", but complains about two terms in a row:

$ perl6 -e 'my $x = Q[1}; say "pwnd"; #]; "a" ~~ /<$x>/'
===SORRY!=== Error while compiling EVAL_0
Two terms in a row
at EVAL_0:1
------> anon regex { ^1};\c[32]⏏say\c[32]"pwnd";\c[32]#}
    expecting any of:
        infix stopper
        infix or meta-infix
        statement end
        statement modifier
        statement modifier loop

skids++ added a test to S05-interpolation/regex-in-variable.t (commit 
https://github.com/perl6/roast/commit/5c539db0a7) which checks whether the 
command dies.

Is that good enough to close the ticket?

Reply via email to