my $word;  #this is it--are you supposed to do this?
if ($part eq 'n')
{   $word = new Noun(@blah);
}
elsif ($part eq 'v')
{   $word = new Verb(@blah);
}
else
{   $word = new Adjective(@blah);
}
print $word->get_english();
#etc etc