2009-09-22 undef perl my $hoge; print "\$hoge is undef\n" if ($hoge eq undef); print "\$hoge is undef\n" if ($hoge == undef);