Select Code to Download

%verbs =
{"jumped","eat","killed"};

%pronoun =
{"I","You","He","She"};

He jumped
She killed
I eat

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