使用sed或awk删除linux中的单词及其后续行

Question

我想知道如何删除以* dd开头并保留其当前行但删除以下行的字词。

我使用此命令删除了sed "s/^\*.dd//" test.cbl > test.cbl.new这个词，但是我无法移除下一行。

Answer 1

使用此sed解决方案：

sed '/^\*.dd/{s/^\*.dd//;n;d};' test.cbl > test.cbl.new

将搜索您的模式，然后搜索并替换模式（s///）并删除下一行（n;d）。

Answer 2

perl -pe 'if (s/^\* dd//) { readline }' test.cbl

应该这样做。或更多压缩：

perl -pe '<> if s/^\* dd/' test.cbl