$query =~ s/(["']).*?\1/S/g;