Select Code to Download

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

my %HoH = map { $array1[$_] => “array2” => $array2[$_] } 0 .. $#array1
+;
%HoH = map { $array1[$_] => “array3” => $array3[$_] } 0 .. $#array1;
%HoH = map { $array1[$_] => “array4” => $array4[$_] } 0 .. $#array1;
%HoH = map { $array1[$_] => “array5” => $array5[$_] } 0 .. $#array1;

Foreach @array1 {
   print $HoH{$array1[$_]}{array5} # array5 associated with array1 
...
   print $HoH{$array1[$_]}{array3} # array3 associated with array1
  # etc. etc.
}