Select Code to Download

my %hash;

my @keys = (1, 2, 3, 4, 5);               # an array of hash keys
my @values = qw(one two three four five); # array of values

@hash{@keys} = @values;

@array[@keys] = @values

@words_array[1..12] = qw(one two three four five six seven eight nine 
+ten eleven twelve);
@words_hash{(1..12)} = qw(one two three four five six seven eight nine
+ ten eleven twelve);