my %hash = map { ($keys[$_] => [$ar1[$_], $ar2[$_], $ar3[$_]]) } 0..$#keys;