Question

如何明确定义regex（编号或命名的捕获组），它总是与零个字符匹配？

> "abc" ~~ m/()abc/
===SORRY!=== Error while compiling:
Null regex not allowed

> my regex null {}
===SORRY!=== Error while compiling:
Null regex not allowed

> my regex null {<[]>}
regex null {<[]>}
> "abc" ~~ m/<null>abc/
False

当然，我可以使用以下内容，但我正在寻找一种惯用的方法。

> my regex null {a ** 0}
regex null {a ** 0}
> "abc" ~~ m/<null>abc/
｢abc｣
 null => ｢｣

UPD：这有效，但这是最好的方法吗？

> my regex null { '' }
regex null { '' }
> "abc" ~~ m/<null>abc/
｢abc｣
 null => ｢｣
> "abc" ~~ m/('') abc/
｢abc｣
 0 => ｢｣

Answer 1

始终成功且匹配0个字符的断言是：<?>。

例如：

say so 'foo' ~~ / <?> 'foo' /;
# output: True

正如raiph指出的那样，相应的负面版本总是失败，是<!>。如果输入有效，我已经使用它来在不应该达到部分解析时插入错误消息。正则表达式的那一部分可能是：

\d || [ { note "Error: the previous token must be followed by a number."; } <!> ]

在Perl 6中使正则表达式完全匹配零个字符的最佳方法是什么？

1 个答案: