Perl 哈希打印键的值

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);