Perl6文法とアクションエラー：「NQPMuタイプのオブジェクトに 'ann'メソッドが見つかりません」

Question

これはperl6の文法と動作に問題があります。私は文字列中のパターンを見つけ出し、それが見つかると直ちにアクションに従ってパターンを変更し、修正された文字列を返したい。

my $test = "xx, 1-March-23, 23.feb.21, yy foo 12/january/2099 , zzz"; 
# want this result: xx, 010323, 230221, yy foo 120199 , zzz"; 
# 2 digits for day, month, year 

grammar month { 
    regex TOP { <unit>+ } 
    regex unit { <before> <form1> <after> } 
    regex before { .*? } 
    regex after { .*? } 
    regex form1 { \s* <dd> <slash> <mon> <slash> <yy> \s* } 
    regex slash { \s* <[ \- \/ \. ]> \s* } 
    regex dd { \d ** 1..2 } 
    regex yy { (19 | 20)? \d\d } 
    proto regex mon {*} 
    regex mon:sym<jan> { \w 'an' \w* } 
    regex mon:sym<feb> { <sym> } 
    regex mon:sym<mar> { <[Mm]> 'ar' \w* } 
} 
class monAct { 
    method TOP ($/) { make $<unit>.map({.made}); } 
    method unit ($/) { make $<before> ~ $<form1>.made ~$<after>; } 
    method form1 ($/) { make $<dd>.made ~ $<mon>.made ~ $<yy>; } 
    method dd ($/) { 
     my $ddStr = $/.Str; 
     if $ddStr.chars == 1 { make "0" ~ $ddStr; } else { make $ddStr; } 
    } 
    method mon:sym<jan> ($/) { make "01"; }; 
    method mon:sym<feb> ($/) { make "02"; }; 
    method mon:sym<mar> ($/) { make "03"; }; 
} 

my $m = month.parse($test, actions => monAct.new); 
say $m; 
say $m.made; 

しかし、それは言う：！

=== === SORRYタイプのオブジェクトのメソッド 'アン' を見つけることができませんNQPMu

私が間違って何をしたのですか？ご協力ありがとうございました ！！！

Answer 1

これは私にとってRakudoのバグのように見えますが、おそらくbeforeはlookahead assertionsの構文の一部です。

それはすでに簡単な/ <before> /でトリガすることができます。

非常に少なくとも

$ perl6 --version 
This is Rakudo version 2016.11-20-gbd42363 built on MoarVM version 2016.11-10-g0132729 
implementing Perl 6.c. 

$ perl6 -e '/ <before> /' 
===SORRY!=== 
Cannot find method 'ann' on object of type NQPMu 

、それは素晴らしいエラーメッセージ未満の場合です。

rakudobug@perl.org、 How to report a bugに報告してください。