if (not $string =~ s/\d{10}//g) {
unless ($string =~ s/\d{10}//g) {