我想增加字符串 perl 中所有数字的出现次数
例如。如果我的字符串为 $str =“转到第 34 页并阅读第 3 行”
它应该更改为 $str =“转到第 35 页并阅读第 4 行”。
我尝试使用
$str =~ s/[\d]/$&+1/g
但它以字符串形式输出,即“转到页码 34+1 并读取第 3+1 行”
这个怎么样:
$ echo "foo 1 bar 2" | perl -pE 's/(\d+)/$1+1/ge'
foo 2 bar 3
重点是e
将替换部分视为表达式的正则表达式选项。
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)