Journal of LTjake (4001)
I've been doing exception handling with perl in the way most people expect This code tends to be a bit fragile when it comes to deciphering particular type of failure. Was it a "file not found" error? You can do a simple regex to find out. However, what if error messages are localized? Ugh.It wasn't until recently that I truly learned the power of "exceptions as objects" in programming. In particu
Error - Error/exception handling in an OO-ish way - metacpan.org
NAME Error - Error/exception handling in an OO-ish way SYNOPSIS use Error qw(:try); throw Error::Simple( "A simple error"); sub xyz { ... record Error::Simple("A simple error") and return; } unlink($file) or throw Error::Simple("$file: $!",$!); try { do_some_stuff(); die "error!" if $condition; throw Error::Simple -text => "Oops!" if $other_condition; } catch Error::IO with { my $E = shift; print
1
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
処理を実行中です
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
http://totora.jpn.org/mt/archives/2006/01/perl_1.html
