Изменения

Perl code style

374 байта добавлено, 12:39, 14 октября 2014
м
Нет описания правки
<code-perl>
my $rows = $dbh->selectall_arrayref("SELECT * FROM table WHERE x=?", {Slice=>{}}, $var1);
</code-perl>
Для получения ссылки на массив со значениями первой колонки — <tt>$dbh->selectcol_arrayref</tt>; для получения первой строчки в виде списка — <tt>$dbh->selectrow_array</tt>; иногда можно применять и <tt>$dbh->selectall_hashref</tt>.
При этом нежелательно без крайней необходимости использовать пары prepare/execute , построчный fetch и длинные списки переменных вместо хешей:
<s><code-perl>
}
</code-perl></s>
 
Пары prepare/execute и построчный fetch имеет смысл использовать только при обработке очень больших наборов данных, и в этом случае '''при использовании MySQL обязательно включить mysql_use_result'''.