Как реализовать "COPY table TO stdout" на perl используя модуль Pg. |
[исправить] |
Для просмотра всего содержимого таблицы оптимальнее использовать COPY TO, вместо SELECT.
$conn->exec('COPY table (in, out) TO stdout');
die $conn->errorMessage if($conn->errorMessage);
$conn->getline($cur_line, 512);
while ($cur_line ne '\\.'){
my ($in, $out) = split(/\t/, $cur_line);
....
$conn->getline($cur_line, 512);
}
$conn->endcopy;
|
|
|
22.01.2004
|
Раздел: Корень / Программисту и web-разработчику / SQL и базы данных / PostgreSQL специфика / Оптимизация и администрирование PostgreSQL |