perl怎么删除匹配的行

perl

2265

2023/10/16 20:18:16

栏目: 编程语言

在Perl中，可以使用-i选项对文件进行原地编辑来删除匹配的行。以下是一个示例：

#!/usr/bin/perl

use strict;
use warnings;

# 指定要删除的行的匹配模式
my $pattern = 'example';

# 打开文件进行读写，并启用原地编辑
while (<>) {
    if (!/$pattern/) {
        print;
    }
}

使用时，可以将上述代码保存为一个Perl脚本（例如delete_lines.pl），然后在命令行上运行：

perl -i delete_lines.pl input.txt

其中input.txt是要进行操作的文件名。脚本将删除文件中匹配$pattern的所有行。

辰迅云「云服务器」，即开即用、新一代英特尔至强铂金CPU、三副本存储NVMe SSD云盘，价格低至29元/月。点击查看>>

perl怎么删除匹配的行

最新知识库

相关标签