Perl

例外処理

例外を発生させるにはdie関数を使う。例外が発生するとプログラムはメッセージを出力して終了する。
die "例外が発生しました。";
例外をキャッチするには「eval { };」を使用する。例外が発生した場合は特殊変数「$@」にメッセージが代入される。「$@」の値を調べることで例外が発生した場合の処理を記述できる。
eval {
    例外が発生する処理
};

if ($@) {
    例外が発生した場合の処理
}

戻る