2009-11-29 undefに注意 perl 以下のテストコードではTRUEが出力される!!! if (my @tmp = undef) { print "TRUE\n"; } else { print "FALSE\n"; } サブルーチンでundef返すことがあるケースでは、wantarrayで呼び出し側のコンテキストを確認することが望ましそう。