如何在 Raku 中插入包含捕获组括号的字符串作为正则表达式？

Question

我想与包含许多(.*)捕获组的以编程方式构建的正则表达式进行匹配。我有这个正则表达式作为一个字符串，说

my $rx = "(.*)a(.*)b(.*)"

我想将该字符串插入为正则表达式并与之匹配。该文档告诉我<$rx>应该做的伎俩（即插补该字符串作为一个正则表达式），但事实并非如此。比较匹配的输出（在perl6REPL 中）：

> 'xaybz' ~~ rx/<$rx>/
?xaybz?

与预期/所需输出相比，将捕获组分开：

> 'xaybz' ~~ rx/(.*)a(.*)b(.*)/
?xaybz?
 0 => ?x?
 1 => ?y?
 2 => ?z?

---

注释

我可以这样做的一种不吸引人的方法是评估我的正则表达式匹配（也在 REPL 中）：

> use MONKEY; EVAL "'xaybz' ~~ rx/$rx/";
?xaybz?
 0 => ?x?
 1 => ?y?
 2 => ?z?

因此，虽然这确实给了我一个解决方案，但我确信我缺少一个字符串插值技巧，它可以避免依赖EVAL..

Answer 1

进行匹配的结果是在正则表达式之外进行匹配。这将起作用：

my $rx = '(.*)a(.*)b(.*)';
'xaybz' ~~ rx/$<result>=<$rx>/;
say $<result>;
# OUTPUT: «?xaybz?? 0 => ?x?? 1 => ?y?? 2 => ?z??»

因为，通过分配给 Match 变量，您正在访问原始 Match，然后您可以打印它。问题是 <$rx> 实际上是一个匹配项，而不是一个字符串。所以你正在做的是一个匹配匹配的正则表达式。可能 Match 被字符串化，然后匹配。哪个是我最接近解释结果的

Answer 2

问题是<…>一般情况下无法捕捉到的东西。

'xaybz' ~~ / <:Ll> <:Ll> <:Ll> /
# ?xay?

如果后面的第一件事<是字母，他们会捕获。

my regex foo { (.*)a(.*)b(.*) }

'xaybz' ~~ / <foo> /;
# ?xaybza?
#  foo => ?xaybza?
#   0 => ?x?
#   1 => ?y?
#   2 => ?za?

如果您使用，这也适用 <a=…>

'xaybz' ~~ / <rx=$rx> /;
# ?xaybza?
#  rx => ?xaybza?
#   0 => ?x?
#   1 => ?y?
#   2 => ?za?

当然，您也可以在外部分配它。

'xaybz' ~~ / $<rx> = <$rx> /;
# ?xaybza?
#  rx => ?xaybza?
#   0 => ?x?
#   1 => ?y?
#   2 => ?za?

'xaybz' ~~ / $0 = <$rx> /;
# ?xaybza?
#  0 => ?xaybza?
#   0 => ?x?
#   1 => ?y?
#   2 => ?za?

请注意，<…>是次比赛，因此$0，$1，$2从$rx永远不会在顶层。