foreach my $verb (shuffle keys %verb)
{
  print $RANDOM_PRONOUN.' '.$verb.';'
}