ブロック
Perlのブロックってすごいよね. パッと見, 構造っぽいもん. でもevalとかdoとかってブロックが後に続いているだけなんだよね(微妙な認識かも)?
@odd_numbers = grep { $_ % 2 } 1..100
となると, 言語自身にtry~catchのような例外の機構を備えていないPerlでも:
try { print 1 / 0; } catch { print "Divided by zero\n"; };
こんなコトができちゃうワケか! すげぇ!
まぁError.pm使えばいいんだけどね! 自分で書く必要もないんだけどね! プログラミングPerlに載っているけどね!
でも面白いね!