如何从数组中使用键和另一个数组创建一个Perl哈希值？

Question

在Perl中，如何使数组@A和@B具有相同数量的元素的散列？目标是在@B中将每个值@A作为关键值。所得到的散列%C将使得能够唯一地识别来自@A的供应密钥的@B中的元素。

Answer 1

它的那样简单

my %c; 
@c{@a} = @b; 

Answer 2

如果我理解正确的问题：

my %c; 
$c{$a[$_]} = $b[$_] for (0 .. @a-1); 

Answer 3

A是键，B的是哈希C的值：

use strict; 
use warnings; 

my @a = 1 .. 3; 
my @b = 4 .. 6; 
my %c; 
for (0 .. $#a) { 
    $c{$a[$_]} = $b[$_] 
} 

请记住，不能有任何重复的值A数组。

Answer 4

use List::MoreUtils 'mesh'; 
my %c = mesh @a, @b; 

这就是它的内部是怎样做（如果你确定大约相等数量的元素）：

my %c = map { $a[$_] => $b[$_] } 0 .. $#a;