$n =~ tr/[0-9]//cd;