如何在 Perl 中将两个数组分配给一个散列?

问题描述

我有几行代码，其中包含两个大数组(因此不能将其写入散列)，我想将它们与散列连接起来.

I have lines of code with two large arrays (so can't just write it into a hash) which I want to connect with a hash.

例如，$array1[0] 成为键，$array2[0] 成为值，依此类推到 $array1[150],$array2[150].

For example, $array1[0] becomes the key and $array2[0] becomes the value and so on to $array1[150],$array2[150].

对我如何做到这一点有任何想法吗?

Any ideas how I do this?

推荐答案

您可以在一个作业中完成:

You can do it in a single assignment:

my %hash;
@hash{@array1} = @array2;

这是一个常见的成语.来自 perldoc perldata on slices:

It's a common idiom. From perldoc perldata on slices:

如果您对使用的原因感到困惑在散列切片上有一个@"一个'%'，这样想.这括号类型(方形或卷曲)控制它是一个数组还是一个正在查看哈希.在另一手，前导符号('$' 或 '@')在数组或散列上指示是否你得到了一个单一的价值(标量)或复数(列表).

当我看到其中一个时，我会在脑海中看到拉链的图像...

When I see one of these I see a mental image of a zipper...

这篇关于如何在 Perl 中将两个数组分配给一个散列?的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持！