$query =~ s/,$//;