Naïve implementation of Perl 5 Lingua::ENG::Word2Num