Question

为什么这个后置断言在锚定到字符串的前面时不起作用？运行以下代码，您将看到第一个测试通过，但第二个测试仅通过^锚点变化，但失败。

use Test::More tests => 2;

my $s = '/123/456/hello';    
$s =~ s{(?<=/)\d+(?=/\d+/hello)}{0};  # unanchored
is($s, '/0/456/hello', 'unanchored'); # passes

$s = '/123/456/hello';
$s =~ s{^(?<=/)\d+(?=/\d+/hello)}{0}; # anchored
is($s, '/0/456/hello', 'anchored');   # fails

将^移入后视断言对我来说不是一个选项（这是一个极其简化的例子），但确实解决了这个问题。我找到了另一种方法来做我想要的，但我很好奇为什么这种方法不起作用。我在perl 5.8.8和perl 5.10.0上进行了测试。

Answer 1

请记住，断言是零宽度，不会消耗它匹配的字符。所以锚必须进入断言，否则整个表达式都不匹配。

Answer 2

字符串上的

(?<=/)\d+(?=/hello)与456匹配，因为它是字符串中唯一适用于两种外观的部分。当您锚定表达式时，它不再能够匹配任何内容。外观是零宽度，所以你的第二个模式说“匹配从字符串开头开始的一个或多个数字，前面的字符是斜线”，这显然是不可能的。

Answer 3

我猜它是因为（？＆lt; =是正面看后面（不是负面的）而你在字符串开头之前你不能有一个字符。如果你在负面看后面，你应该使用（？＆lt;！而不是。

Answer 4

在刺痛的前方没有任何东西，所以当用^锚定时，任何非空的后视都会失败。

为什么这个正面的后置断言在锚定到字符串的开头时不起作用？

4 个答案: