какие драйвера (DBD::Pg) используете? версии я имею ввиду.

из последних версий там
1. ноябрьская
2. апрельская

обе с мемори ликами

вот такой код течет мегабайт в секунду где-то:

#!/usr/bin/perl

use strict;
use warnings;
use Data::Dumper;
use DBI;

my $dbh = DBI->connect('dbi:Pg:dbname=Database;host=localhost',
    login => 'XXXX');

$dbh->do('CREATE TEMPORARY TABLE tbl (id SERIAL PRIMARY KEY, val
INTEGER[])');

our $cnt;
sub _flush_data
{
    my ($array) = @_;

    my $sql = sprintf "INSERT INTO tbl (val) VALUES %s",
        join ",", map '(?)', @$array;

    $dbh->do($sql, undef, @$array);
    printf "saved: %d\n", scalar @$array;
}


while(1) {
    my @ary;
    push @ary, [ 0 .. int rand 10] for 0 .. int rand 50;
    _flush_data(\@ary);
}


Пошел я отписаться в их багтрекере, а там еще кроме моего куча багов и тоже
про мемори лики и причем в других местах.
я тут было по результатам тестов и ощущений хотел было новый проект на
постгрисе замутить вместо mysql, но ситуация с DBD::Pg крайне удручает. если
почти год лежит версия с утечками памяти и фиксов нету, то как ее
использовать? она уже даже в Debian/stable блин попала...
--
Moscow.pm mailing list
[email protected] | http://moscow.pm.org

Ответить