Perl 使用一个grep操作而不是两个grep操作？

因为我只想使用Perl的

grep

，所以在我运行的以下命令中是否有一种有效的方法来使用

grep

@found = grep { !/$IP/ } `$SSH $IPs[0] netstat -Aan | /bin/grep 1010`;

基本上，我连接到一个文件服务器，执行

netstat

命令和包含1010的grep IP地址。然后在这个输出上，我需要使用

grep

来查找特定的IP地址。 是否可以仅使用一个Perl命令以某种方式完成此操作？

当然，您可以这样做：

@found = grep { /1010/ && !/$IP/ } `$SSH $IPs[0] netstat -Aan`;

您在

grep

中使用的条件不仅可以是任意表达式，还可以是一整段代码（如果需要）。

当然，您可以这样做：

@found = grep { /1010/ && !/$IP/ } `$SSH $IPs[0] netstat -Aan`;

---

您在

grep

中使用的条件不仅可以是任意表达式，如果需要，甚至可以是完整的代码块。

谢谢！谢谢你！