结束 x/ 的回溯步骤

Question

我正在阅读 Jeffrey Friedl 的《Mastering Regular Expressions 3rd Ed》一书。在第 274 页，Jeffrey 要求他的读者调查为什么正则表达式 /x([^/]|[^x]/)*x/ 匹配字符串（匹配的字符以粗体标记）“years =天 /x 除以 x//365；/x 假定为非闰年 x/"。

我从正则表达式中删除了结尾 x/。所以正则表达式 /x([^/]|[^x]/)* 的输出是 "/x 除 x//365; "。但是在我添加了 x/ 之后，正则表达式 /x([^/]|[^x]/)*x/ 的输出是 "/ x 除 x//365；/x 假设为非闰年 x/"。

谁能告诉我 Perl 的正则表达式引擎对结尾 x/ 的回溯步骤？

这是我针对这个问题的 perl 脚本。

my $str = "years = days /x divide x//365; /x assume non-leap year x/";
if ($str =~ m{(/x([^/]|[^x]/)*)}) {
    print "\$1: '$1'\n"; # output: $1: '/x divide x//365; '
} else {
    print "not matched.\n";
}


$str = "years = days /x divide x//365; /x assume non-leap year x/";
if ($str =~ m{(/x([^/]|[^x]/)*x/)}) {
    print "\$1: '$1'\n"; # output: $1: '/x divide x//365; /x assume non-leap year x/'
} else {
    print "not matched.\n";
}

Answer 1

这是纲要：

/x - 匹配 / 后跟 x
([^/]|[^x]/)* - 匹配任何不是 a /，或者不是 x 后跟斜线 - 尽可能多次
x/ - 匹配 x 后跟 /

所以基本上它是这样说的：以/x 开头，然后匹配除x/ 之外的所有内容，最后以x/ 结束。

Answer 2

我明白了。约瑟夫是对的。当第二个“/x”匹配失败时，正则引擎回溯到“/x”试一试，成功了。