perl -pe's/\d/$&x$&/ge'