Let's start Scheme

2007-02-01

例外処理

perlでの上手い例外処理ってないのかなぁ。
Errorモジュールは諸事情により使えないので、
他にないのかなぁとか思うんだけど、
ものすごくかったるいのしか思いつかない。
こんなの。
eval {
  # 処理したい内容
}; if ($@) {
  print $@;
}
なんか他にないのかなぁ。
C++やJavaみたいにtry-catchがあると便利なんだけ、
やはりErrorモジュールを使った方がいいだろうか・・・

No comments:

Post a Comment