in reply to spelled out numbers to digits

I actually posted a similar question, the other day.
Check out Address conversion

In Section Seekers of Perl Wisdom