in reply to Hash create

In one line: 
my %hash = map { $arr1[$_], $arr2[$_], } (0..$#arr1);

[download]

In Section Seekers of Perl Wisdom