本文へスキップ
BecomeCoder

Perlのエラー · エラー10

Died ― die で明示的に終了した

die を呼ぶとプログラムはそこで異常終了します。メッセージを渡さずに呼ぶと Died という既定文言になります。

出るコード

sub check {
    my ($n) = @_;
    die unless $n > 0;   # 条件を満たさず die
}
check(-1);

エラーメッセージ

Died at script.pl line 3.

直し方

die "エラーの理由" のように理由を書いて呼ぶと原因が分かりやすくなります。想定内のエラーなら eval { ... }$@ で捕まえて処理を続けます。