我需要将文件的 grepped 输出作为变量。答案

【问题标题】：I need to get the grepped output of a file to be a variable.我需要将文件的 grepped 输出作为变量。
【发布时间】：2014-09-16 06:20:07
【问题描述】：

我只是在这里画空白

我有一个使用主变量调用的文件，我需要 grep 文件并删除一行

$HOME = $ENV{HOME};
$servers="$HOME/path/file.conf"

因此，我需要 grep 文件并从中删除一行。如果我收到提示，我只会做一个 grep -v servername 但有没有办法通过修改 $servers 来做到这一点我只编辑脚本的一部分，但我需要从这个列表中删除一个服务器.

我正在尝试类似的东西

 servers = $($HOME/path/file.conf |grep -v servername);

但是我的 Perl 不是那么好，我不确定我哪里出错了。

任何帮助都会很可爱，谢谢厘米

【问题讨论】：

【解决方案1】：

如果你想使用 linux grep ：

 my $HOME = $ENV{HOME};
 my $servername='someserver.com';
 my @servers = qx(grep -v $servername $HOME/path/file.conf );

【讨论】：

【解决方案2】：

您可以将文件添加到行数组中，然后过滤掉您不想要的行：

use File::Slurp;

my @lines = read_file("$HOME/path/file.conf");
@lines = grep { $_ !~ /servername/ } @lines;

【讨论】：