perl - perl スクリプトでエラー メッセージを出力する

Question

私はこのperlスクリプトを実行しています:

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

some command正しく実行されなかった場合、スクリプトはhas failedそれ以上有用な情報なしで失敗します。

die生成されたエラーメッセージを出力するコマンドを作成するにはどうすればよいsome commandですか?

ありがとう

Answer 1

このようなもの：

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

Perl エラー変数も参照してください。