$scottnum =~ tr/0-9//cd;