>  2000/08/14 (月) 05:23:39      [mirai]
> > あやしいわーるどはスーパーハカー揃いだと聞いたので質問します。
> > Perlで、あるサブルーチンを作りました。
> > 成功すると1、失敗すると0を返すようなサブルーチンです。
> > ですが内部の動作はわりと複雑なので、どうして成功または
> > 失敗したのかという理由も返したいのです。
> > 使い方的には
> >     Function() || die "失敗の理由"; としたいです。
> >     open() || die "Can't Open Stream :$!"; と同じような感じで使いたい。
> > どうすれば簡単か教えてください。ペコリ。
> グローバル変数を使うか関数にエラーメッセージを
> 格納する変数へのリファレンスを渡す。
> 実際特殊変数の$!はグローバル変数だし。

つか1や0以外の値を返せばいいだけのような
-2なら○○エラー
-3なら□□エラー

2なら○○で成功
とか

参考:2000/08/14(月)05時20分30秒