perlで2つの配列をzipする

なんかすごいやりかたばかり出てくる。

• Is there an elegant zip to interleave two lists in Perl 5? - Stack Overflow

たぶんいちばんわかりやすいのはこれ。

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

ツッコまれてたけどそれは前提の問題だと思う。

This has problems for unequally-sized arrays. – brian d foy Jan 3 '10 at 17:47