Perl搜索和替换

Modified on: Wed, 09 Oct 2019 23:20:02 +0800

如何使用搜索和替换来更改文件的内容。

我需要能够将'all to none'和/或'none to all'更改为无需每次手动执行数百行。

下面的

是一个示例文本文件,右侧是行号。我知道如何打开和关闭文件进行写入。

1 define_filter absolute_minimal_filter ------- all
2 define_filter atma_basic_filter -------- -----无
3 define_filter atma_communication_filter - 全部
4 define_filter atma_health_filter -------------无
5 define_filter atma_misc_filter --------------- all
6 define_filter atma_performance_filter ----无
7 define_filter atma_supplemental_filter ---- none

作者:user36101

最佳答案

使用精心挑选的字符串代替“temp”(在两个地方):

sed 's/all/temp/g;s/none/all/g; s/temp/none/g' input_file > output_file

或没有临时字符串,如果“all”和“none”永远不会出现在同一行并始终以该行结尾:

sed 's/all$/none/;t;s/none$/all/' input_file > output_file

相关问答

添加新评论