perl hash 打印一个键的值

Question

下面的脚本存储键值对。 根据给定的输入键，它应该检索相应的值。 在下面的代码中，我能够从第一次打印中看到键值对，但是当我将其中一个键作为输入时，它会抛出一个错误，指出“未初始化的哈希”。 如何解决这个问题？

...
for my $key ( sort keys %hash ) {
    print "$key = $hash{$key}\n"; 
}
 my $key = <STDIN>;
 print "list is = $hash{$key}\n";

Answer 1

$key包含输入的行，包括尾随换行。 添加

chomp($key);