如何從數組中使用鍵和另一個數組創建一個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;