只有在其密钥存在时,如何才能检索Perl哈希值？

Question

码:

%a =  ( 1 => "ONE" , 
        2 => "TWO" ,
        3 => " Three", ); 
$test_value = 1 ;

foreach $key (sort(keys %a)) {
    if  ($key == $test_value ) { 
        print $a{$key}; 
    }

}

我只想以非常短的方式实现相同的操作.这有什么捷径吗？

Answer 1

我想这就是你要找的东西:

print $a{$test_value};

Answer 2

print $a{$test_value} if exists $a{$test_value};