$ cat num Hello 12345 world 23456 777381 89651 #### $ perl -lpne 's/\d/qw(zero one two three four five six seven eight nine)[$&]/ge' num #### $ perl -lpe 's/\d/qw(zero one two three four five six seven eight nine)[$&]/ge'
## $ perl -lpne 's/\d/qw(zero one two three four five six seven eight nine)[$&]/ge' num ##
## $ perl -lpe 's/\d/qw(zero one two three four five six seven eight nine)[$&]/ge'