$word{noun} = [ qw(bird dog table dollar econonmy ennui) ];
$word{verb] = [ qw(eat drink fire annoy) ];
$word{article}= [ qw(a the an) ];