$person = {}; # new anonymous hash
$person->{AGE} = 24; # set field AGE to 25
$person->{NAME} = "Nat"; # set field NAME to "Nat"
If you're looking for something a bit more rigorous, try the perltoot manpage.