Привязка формального параметра к столбцу (bind_col)

Назначение
 

Метод bind_col выполняет привязку параметра к возвращаемому SELECT-запросом значению столбца (полю записи выборки данных). При перемещении по выборке данных значение привязанного параметра автоматически изменяется.

Метод bind_col необходимо использовать после вызова метода execute.

Пакет

Package Linter::st

Прототип
$rc = $sh- >bind_col($column_number, \$var_to_bind);
$rc = $sh- >bind_col($column_number, \$var_to_bind, \%attr);
$rc = $sh- >bind_col($column_number, \$var_to_bind, $bind_type);
Параметр Описание
$column_number Порядковый номер столбца выборки данных. Отсчет начинается с 1
$var_to_bind Ссылка на переменную для привязки
$bind_type Тип привязываемого параметра. Зарезервировано для дальнейшего использования
Возвращаемые значения
Переменная Описание
$sh:  
1 Нормальное завершение
0 Ошибка выполнения метода
$DBI::errstr Диагностическое сообщение (в случае ошибки)
Пример
my ($model, $make, $year);
my $dbh = $drh - > connect("DEMO", "SYSTEM", "MANAGER8")
        or die "Could not connect to database: " . DBI- >errstr;
my $sth = $dbh- >prepare("select MODEL, MAKE, YEAR from AUTO;");
$sth- >execute();
$sth- >bind_col(1, \$model);
$sth- >bind_col(2, \$make);
$sth- >bind_col(3, \$year);
while ($sth- >fetch)
{
    print("MODEL = $model\n");
    print("MAKE = $make\n");
    print("YEAR = $year\n");
}
$sth- >finish();
$dbh- >disconnect();