Для просмотра всего содержимого таблицы оптимальнее использовать 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;
|