Size: a a a

2019 December 04

AP

Anton Petrusevich in Modern::Perl
почему бы не воспользоваться абстрактом?
источник

IA

Ivan Avseyanko in Modern::Perl
Всё-равно, по сравнению со временем запроса grep по массиву - копейки.
источник

AP

Anton Petrusevich in Modern::Perl
какой к фигам греп...
источник

AK

Andrey Konovalov in Modern::Perl
Ivan Avseyanko
Но скорее всего он имел в виду is null or in ()
Хм... Ну, такое возможно, но лучше бы тогда он прозрачно так и написал в запросе.
Тут наверное движок сборки запроса не должен умничать: что сказали ему сделать, то пусть и делает. Нужно мудрость естественного интеллекта размазывать по коду равномерно, а не заставлять движки думать за разработчика :)
источник

AK

Andrey Konovalov in Modern::Perl
Anton Petrusevich
какой к фигам греп...
Только first!
источник

IA

Ivan Avseyanko in Modern::Perl
Andrey Konovalov
Только first!
Ооокей, можно и цикл, по классике... )
источник

AP

Anton Petrusevich in Modern::Perl
$ perl -MData::Dumper -MSQL::Abstract -E '$s=SQL::Abstract->new; ($w, @b)=$s->where({state => [1,2,3,undef,4]}); say $w; say Dumper \@b'
WHERE ( ( state = ? OR state = ? OR state = ? OR state IS NULL OR state = ? ) )
$VAR1 = [
         1,
         2,
         3,
         4
       ];
источник

AP

Anton Petrusevich in Modern::Perl
$ perl -MData::Dumper -MSQL::Abstract -E '$s=SQL::Abstract->new; ($w, @b)=$s->where({state => [1,2,3,undef,{"=" => \"column"},4]}); say $w; say Dumper \@b'
WHERE ( ( state = ? OR state = ? OR state = ? OR state IS NULL OR state = column OR state = ? ) )
$VAR1 = [
         1,
         2,
         3,
         4
       ];
источник

AP

Anton Petrusevich in Modern::Perl
и что дби делал бы со всей такой "радостью"?
источник

AK

Andrey Konovalov in Modern::Perl
Anton Petrusevich
и что дби делал бы со всей такой "радостью"?
Красота-то какая...
{"=" => \"column"}
источник

AP

Anton Petrusevich in Modern::Perl
что не так? надо просто уловить логику... :)
источник

VG

Vadim Goncharov in Modern::Perl
логику не надо "улавливать", она должна быть описана в документации
источник

VG

Vadim Goncharov in Modern::Perl
и что-то мне подсказывает, что там это есть :)
источник

AP

Anton Petrusevich in Modern::Perl
есть, конечно
источник

AK

Andrey Konovalov in Modern::Perl
Интересно, как my и postgre пришли к тому, что у них select "column name" и ```select `column name````, причём в postgre нельзя бэктик использовать, а в my - двойную кавычку?
источник

VG

Vadim Goncharov in Modern::Perl
отредактируй еще, слишком мало пунктуации
источник

AK

Andrey Konovalov in Modern::Perl
Anton Petrusevich
есть, конечно
SQL::Abstract и SQL::Abstract::More здорово бы помогли, если бы умели принимать на вход dbh и брать всё необходимое из него. Но им даже на тип база данных, под которую готовится запрос, положить, они предпочитают костыли типа quote_char
источник

AK

Andrey Konovalov in Modern::Perl
Я не думаю, что даже join-ы в update-ах были бы сложны для abstract'а, знающего, под какой движок он их готовит.
источник

AK

Andrey Karepin in Modern::Perl
postgres же
источник

VG

Vadim Goncharov in Modern::Perl
sqlite!
источник