Ааа, понятно - я выпаду после этого комментария, так как не знаю Perl.Но я бы поверил, что редактор правильно выделил $ q как константу.Я предполагаю, что вам нужно объединить значение в строку, а не просто напрямую ссылаться на переменную.Итак, я предполагаю, что если + используется для конкатенации строк в Perl, то используйте что-то вроде:
my $ sql = qq {SELECT a, b, c ОТ ГДЕ Lower (a) LIKE '} +$ q + qq {'};
(Примечание: если язык тесно не интегрирован с базой данных, такой как Oracle / PLSQL, перед отправкой в базу данных обычно требуется создать полностью допустимую строку SQLожидая, что компилятор «интерполирует» / «подставит» значение переменной.)
Я бы снова предложил получить COUNT () операторов, чтобы убедиться, что вы сравниваете яблоко с яблоками.