$query =~ s{
             \b(in|values?) *\( *([NS]) *,[^\)]*\)
           }
           {$1($2+)}gx;