use Lingua::EN::Numbers qw(num2en); print num2en(4); __END__ four [download]
In reply to Re: Help with Regular Expressions and Perl by toolic in thread Help with Regular Expressions and Perl by vc859