Question

perl如何不通过键值而获取哈希表中的键名

现已知$str = 'abc';
$hash = {'abc'=>123, 'def'=>456,};
想要遍历%$hash而判断哪一个键名是等于$str的，从而提取出123

Answer 1

需要遍历哈希：

$str = 'abc';
%h = ('abc'=>123, 'def'=>456,);
for $k (keys(%h)) {
    if($k eq $str)
    {
        $v = $h{$k};
        printf("$k =>  $v.\n");
    }
}