my $question = { descriptions => { m => "male", f => "female", o => "other" }, choices => [ qw/m f o/ ] }