my %hash=map {$array1[$_]=>$array2[$_]} 0..$#array1;