undef

my $hoge;
print "\$hoge is undef\n" if ($hoge eq undef);
print "\$hoge is undef\n" if ($hoge == undef);