Perl：将键和值的数组转换为哈希表。

Question

我有两个这样的数组

my @keys = qw/Key_1 Key_2 Key_3/;
my @values = qw/foo bar more/;

是否有一种简短的方法（即单个函数）可以在不使用循环的情况下获得像这样的哈希？

my %hash_table = ( Key_1 => "foo", Key_2 => "bar", Key_3 => "more" );

我尝试使用map函数，但没有成功。

- Wernfried Domscheit

Answer 1

使用哈希 切片，

my %hash_table;
@hash_table{@keys} = @values;

使用 map 函数

my %hash_table = map { $keys[$_] => $values[$_] } 0 .. $#keys;

- mpapec