%labels = ('eenie'=>'your first choice',
      'meenie'=>'your second choice',
      'minie'=>'your third choice');

print $query->popup_menu(-name=>'menu_name',
    -values=>['eenie','meenie','minie'],
	    -default=>'meenie',
	    -labels=>\%labels);