Perl 6规则如何将参数传递给另一个规则？

Question

在中，如何将参数传递给Perl 6语法？我将参数作为子菜单的一部分传递给规则。我想知道我是如何完全在语法中做到这一点的。假设我有这样的东西：

grammar TryIt {
    rule TOP            { \d+ <stuff> }
    rule stuff ($count) { <[ \S A..Z ]>{$count} }
    }

my $match = TryIt.parse: "123 ABCD";
say $match;

如何将参数从TOP传递到stuff？我没有发现任何例子，关于parens的各种猜测都不起作用。

Answer 1

这两种形式都有效：

<stuff(...)>

<stuff: ...>

不确定它们在用户文档中列出的位置，但S05:Regexes和Rules设计文档中有一节介绍它们。

请注意，在规则中，像0$和$/这样的反向引用只保证在序列点之后可用，例如块的开括号。空块{}工作。

示例：

grammar TryIt {
    token TOP            { (\d+) \s {} <stuff($0)> .* }
    token stuff ($count) { <[ A..Z ]> ** {$count} }
}

say TryIt.subparse: "3 ABCDEFG";

输出：

｢3 ABCDEFG｣
 0 => ｢3｣
 stuff => ｢ABC｣