サブルーチン仕様案

• いちいちサブルーチンの返値を受け取ってifするのがメンドクサイ。どうにかしてみる。

• • perlはサブルーチンの返り値を複数持てる
  • $rcは成否を返す undefまたは1。
  • $hashはハッシュのリファレンスで $hash->{code} : エラーコード $hash->{data} : 処理後データ

   ($rc, $hash) = foo();

• • で、こういうような使い方をする。

   my ($rc, $hash) = foo();
   if ($rc) {
      # 成功した
   }

• • $hashがいらないのであれば、こういう使い方もできる…？

   if ( (foo())[0] ) {
      # 成功した
   }

• • もう少しなんとかならないかしら