SELECT name, date FROM

Пример

use OBI;

my $db = DBI->connect('DBI:mSQL:mydata', undef,undef);
my $query = " SELECT name, date FROM myothertable";
my $myothertable_output = $db->prepare($query);

my ($name, $date);

$myothertable_output->bind_col(1,\$name,undef);

$myothertable_output»bind_col(2, \$date, undef);

# Теперь $name и Sdate привязаны к соответствующим полям выходных данных.

$myothertable_output->execute;

while ($myothertable_output->fetch) {

# Каждый раз $name и $date автоматически изменяются.

print "Имя: $name Дата: $date\n"; }



Содержание раздела

---

---