主页 / server / 问题 / 504362
Accepted
yael
Asked: 2013-05-03 00:22:27 +0800 CST

Linux + Perl 一行代码的退出状态

  • 772

我在我的 ksh 脚本中使用 Perl 单行代码。

有时需要从 Perl 单行程序中获取退出状态，以验证 Perl 单行程序是否成功。

例如，我需要验证Perl 一行代码中的“print”是否成功。

但是在这两种情况下，即使 Perl 不匹配单词“AAA 和 BBB”，Perl 也会以状态 0 退出。

也许通过更改我的代码，我可以在 Perl 成功匹配时获得退出状态 0 。当 Perl 不匹配单词“AAA 和 BBB”时获得退出状态 1 。

这可能吗？

more file
AAA BBB


perl -ne '/AAA/ && /BBB/ && print' file
AAA BBB

echo $?
0

 

more file1
ZZZ

perl -ne '/AAA/ && /BBB/ && print' file1
echo $?
 0
linux

1 个回答

  1. Best Answer

    END{...}计算匹配行并在块中基于它设置退出代码：

    perl -ne '/AAA/ && /BBB/ && print && $MATCH++; END{exit 1 unless $MATCH>0}' file
    • 2

相关问题