Oh, that's my pattern doing that (it requires a non-space character after the digit). Try this instead (single digits match):
perl -MLingua::EN::Numbers -pe 's/(\d\S*)/Lingua::EN::Numbers::num2en( +$1) || $1/ge' < input_file > output_file
In reply to Re^3: change numbers in a corpus into words
by kyle
in thread change numbers in a corpus into words
by Anonymous Monk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |