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

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;

##</code><code>##

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