$a = 'acvdef431234'; $a =~ tr/\d/ /c; print "$a"; output: d expected output: 431234 #### $a = 'acvdef431234'; $a =~ tr/[0-9]/ /c; print "$a"; output: 431234