in reply to Spelled out numbers to numerical equivalent function
Someone's already done the hard work for you: Lingua::EN::Numericalize.
Dave