Don't treat $0, $1, etc. as normal variable interpolations.

rakudo · May 25, 2010 · ccc1a9c · ccc1a9c
1 parent 263a905
commit ccc1a9c
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/Perl6/Grammar.pm b/src/Perl6/Grammar.pm
@@ -1811,7 +1811,7 @@ grammar Perl6::Regex is Regex::P6Regex::Grammar {
     }
 
     token metachar:sym<rakvar> {
-        <?[$@]> <?before .\w> <var=.LANG('MAIN', 'variable')>
+        <?[$@]> <?before .<?alpha>> <var=.LANG('MAIN', 'variable')>
     }
 
     token assertion:sym<{ }> {