$a = 'acvdef431234';
$a =~ tr/\d/ /c;
print "$a";
output:   d
expected output:      431234