my $verb_class = get_class($conj); my $stem = get_stem($conj); my $ending = $endings->{$conj->{tense}}->{$verb_class}->[ _get_ending_index($conj) ] or carp "No ending found for $conj->{tense} tense of $conj->{verb} in conjugate( @_ )\n"; if ( my $pronoun = is_reflexive($conj) ) { # commands and infinitives can have the pronoun afterwards, which changes the accenting return "$pronoun $stem$ending"; } return $stem . $ending;