perlでの例外はdieか、croakを使います。 die #!/usr/bin/perl use strict; use warnings; die "Exception Raised"; 上記のスクリプトをdie.plxという名前で保存します。 実行すると、例外が発生してプログラムは停止します。 $ perl die.plx Exception Raised at die.plx line 6. メッセージと一緒に例外が送出されたスクリプトの行数が表示されます。 #!/usr/bin/perl use strict; use warnings; die "Exception Raised\n"; 最後に改行コードを付けると、行数は表示されません。 $ perl die.plx Exception Raised at die.plx line 6. 実行します。 $ perl die.p