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