Select Code to Download

my $hash_ref;
@{$hash_ref}{qw/a b c d/} = (qw/A B C D/);
push @array_of_hash_refs, $hash_ref;