Perlでのエラー処理として一番初めに思いつくのがeval〜if。
#!/usr/bin/perl
eval {
print 1 / 0;
};
if ( $@ ) {
die "ouch! : $@";
}
# 実行すると
# ouch! : Illegal division by zero at 何たら
# と表示される。
これはお世辞にもエレガントとはいえない構文なのでいろんな代替策が作られている。
Category Archives: perl
初めてのブログ
技術系（？）のネタはこちらに書くことにする。Perl見習いとしてはやはりMovable Typeだろうと言うことで、一日かけてセットアップした。
とりあえず真っ先にシンタックスハイライトプラグインを導入。ググってみたらこれが一番いいみたい。
SyntaxHighlighter for Movable Type « kwLog
http://blog.makotokw.com/portfolio/movabletype/syntaxhighlighter/
“say”のような新しいwordをハイライトしてくれないみたいだが、それはまた後でいじろう。
#!/usr/bin/perl use utf8; use errors -with_using; use Modern::Perl; say "Hello, World!";