初めてのPerl 第7版

293

16.3　grep を使ってリストから要素を選び出す

try

は、先ほどの

eval

と同じように動作します。この構文は、エラーが起こった場合のみ、

catch

ブロックを実行します。

finally

ブロックは必ず実行されるので、そこで後始末の処理を行

うことができます。

catch

と

finally

は、なくても構いません。単にエラーを無視したければ、次

のように

try

だけを使うことができます。

my $barney = try { $fred / $dino };

catch

を使ってエラーを扱うことができます。

Try::Tiny

は、

$@

の内容を壊さずに、エラーメッ

セージを

$_

に入れます。それでもなお

$@

にアクセスできますが、

Try::Tiny

の目的の

1

つは、

$@

の乱用を避けることです。

use v5.10;

my $barney =

try { $fred / $dino }

catch {

say "Error was $_"; # $@

でないことに注意

};

finally

ブロックは、エラーが発生してもしなくても、実行されます。もし引数が

@_

に入って

いたら、エラーが発生したことを表しています。

use v5.10;

my $barney =

try { $fred / $dino }

catch {

say "Error was $_"; # $@

でないことに注意

}

finally {

say @_ ? 'There was an error' : 'Everything worked';

};