Select Code to Download

my %hash;
@hash{@Arrayone} = @Arraytwo;

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