use Lingua::Number; my $number = 451; my $language = 'en'; say cardinal($number, $language); # "four hundred fifty-one" say ordinal($number, $language); # "four ...