Архив форумов ЦИТФорума

[DDT]

Подскажите плз, можно ли удалить из таблицы записи средствами перла?

Если это возможно сделать, то скажите пожалуйста, КАК это можно сделать или хотя бы ГДЕ прочитать

Заранее спасибо

[FFF]

а что имеется в виду под таблицей? таблица базы данных? тогда посредством SQL-запроса.
Вот самый простой пример для подключения Базы Данных Interbase из Perl:


# пример работы с БД LIB через DBI.

use DBI;
## use Interperl;

$dbstring = "DBI::InterBase::C:\\BASE\\DATABASE.GDB";
## $user = "SYSDBA";
## $pass = ;
## $statement= "SELECT * FROM bbpers ;";

$dbh = DBI->connect($dbstring, "SYSDBA", "ppppp")
or die "Error connecting to database";
## $rv = $dbh->do($statement);

$sth = $dbh->prepare($statement);
$rv = $sth->execute;
@row = $sth->fetchrow_array;
## @clm = $sth->fetchrow_array;
$rc = $sth->finish; # освобождаем память

print "rec 1: $row[0] \n";
print "rec 2: $row[1] \n";
print "rec 3: $row[2] \n";

$rc = $dbh->disconnect;
$dbh->disconnect;