在 Perl 中如何使用变量作为哈希键？

Question

我一直在努力将变量作为变量分配给 Perl 中的键。我想要做的是提示用户输入要保存在变量中的值，该变量用作访问和打印哈希表中保存的值的键。以下代码有助于说明我的问题：

my $key = 0;
print( "Enter the value for your key\n" );
$key = <>;
my %hash = (
   a => "A",
   b => "B",
);
    print( $hash{$key} );

问题在于 print( $hash{$key} );不会在屏幕上打印任何内容，但 printf( $hash{"a"}; 会；我不明白。任何帮助和澄清将不胜感激。提前致谢。

Answer 1

$key 最终被设置为（例如）"a\n"，而不是"a"。使用 chomp 内置删除尾随换行符：

$key = <>;
chomp $key;
...
print $hash{$key};