$string !~ s/\w|\S//g;