如何确定Perl哈希是否包含映射到未定义值的键？

exists() and defined() don’t seem to be applicable for the situation,they just see if the value for a given key is undefined,they don’t check if the hash actually has the key

不正确.这确实是define()的作用,但exists()完全符合你的要求：

my %hash = (
    key1 => 'value',key2 => undef,);

foreach my $key (qw(key1 key2 key3))
{
    print "$hash{$key} exists: " . (exists $hash{$key} ? "yes" : "no") . "n";
    print "$hash{$key} is defined: " . (defined $hash{$key} ? "yes" : "no") . "n";
}

生产：

$hash{key1} exists: yes
$hash{key1} is defined: yes
$hash{key2} exists: yes
$hash{key2} is defined: no
$hash{key3} exists: no
$hash{key3} is defined: no

这两个函数的文档可以在命令行中找到perldoc -f defined和perldoc -f exists(或者阅读perldoc perlfunc *中所有方法的文档).官方网站文档在这里：

> http://perldoc.perl.org/functions/exists.html
> http://perldoc.perl.org/functions/defined.html

*由于您特别提到了RTFM并且您可能不知道Perl文档的位置,我还要指出您可以在perldoc perl或http://perldoc.perl.org获得所有perldoc的完整索引.