正则表达式 – 使用Perl内联编辑,如何在第N次出现字符串后插入一

发布时间：2020-12-14 05:38:13 所属栏目：百科来源：网络整理

导读：寻找在给定字符串的第N次出现之后插入行的方法. 以下是接近我正在寻找的,但是基于行号,而不是基于给定字符串的第N次出现. perl -ni -e 'print; print "Put after fifth linen" if $. == 5' inFile.txt 解决方法以下将在第二次出现字符串abc后添加一行xyz：

寻找在给定字符串的第N次出现之后插入行的方法.

以下是接近我正在寻找的,但是基于行号,而不是基于给定字符串的第N次出现.

perl -ni -e 'print; print "Put after fifth linen" if $. == 5' inFile.txt

解决方法

以下将在第二次出现字符串abc后添加一行xyz：

perl -pi -e '/abc/&&++$n==2 and $_.="xyzn"' inFile.txt

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!