my %h = ( secret => 1; );
而且我知道这只是哈希中的一个关键，但是我不知道它是什么。
然后我必须遍历那个哈希
my $key; foreach my $i (keys %h) { $key = $h{$i}; }
还是有更好的方法来获取密钥的名称？
(keys %h)[0]
键返回列表，因此只需提取该列表的第一个元素。
