How about something like below? Apart from only digits, it also allows alphabets:

perl -e '$a = "ab%13!3&z* Trial"; $a=~s/(\w+)\W+/$1/g; print $a;'
[download]