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?