Perlで例外処理をしたい場合は、try-catchではなくevalを使うんですね。 （モジュールを使えばtry-catchも使えるそうですが）初めて見た時、「evalってなんだろう？」と悩んだので残しておきます。evalでくくって（try）、ifで例外処理（catch） 例外処理の…