perl - 如何从 Perl 系统命令中查看错误？

Question

我正在运行这段 perl 脚本:

system "bash", "-c",
" some command; exit \${PIPESTATUS[0]}"
and die "has failed"

现在，如果一些命令没有正确执行，脚本将失败并返回has failed，没有任何有用的信息。

如何让 die 命令打印出 some command 产生的任何错误消息？

Answer 1

像这样:

system($cmd) == 0 or die "$0: [$cmd] failed: $?\n";

另见 Perl Error Variables .