$query =~ s/"[^"]*"/S/g;
$query =~ s/'[^']*'/S/g;