Perl 6 的 <|w> 字边界何时不是 << 字边界？

Question

我认为这两段代码应该是等价的。第一个使用<|w> 指定一个单词边界，其中非单词字符（或字符串的开头）应位于H 之前。第二个例子使用<<，它应该做同样的事情。

my $string = 'Hamadryas perlicus';
say $string ~~ /
    <?after <|w> Hamadryas \s+ >
    (\w+)
    /;

say $string ~~ /
    <?after << Hamadryas \s+ >
    (\w+)
    /;

第一个匹配，但第二个不匹配：

｢perlicus｣
 0 => ｢perlicus｣
Nil

这两者还有其他区别吗？

Answer 1

IRC 频道中的This answer by timotimo 暗示了为什么会这样。当您使用after 时，实际上是在翻转正则表达式。然后你必须从右向左翻转，这样就可以了。

use v6;

my $string = 'Hamadryas perlicus';
say $string ~~ /
    <?after  Hamadryas <|w> \s+ >
    (\w+)
    /;

say $string ~~ /
    <?after Hamadryas « \s+ >
    (\w+)
    /;

这将产生您正在寻找的东西。