假设我在Perl中有一个字符串，我想匹配并替换为以下内容：
$string =~ s/[^a-zA-Z]$find[^a-zA-Z]/$replace/g;
因此，如图所示，我要替换两边用非字母字符包围的所有内容。但是，当我替换字符串时，我也不想替换这些字符：它们只是正确匹配所必需的。我怎样才能告诉Perl正则表达式避免替换周围的东西$find？
使用环顾断言。
s/(?<=[^a-zA-Z])$find(?=[^a-zA-Z])/$replace/g
本文收集自互联网，转载请注明来源。
如有侵权，请联系 [email protected] 删除。
我来说两句