ブロック

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に載っているけどね!

でも面白いね!