LINUX.ORG.RU

perl+dbi, передача dbh в функцию


0

0

Вот такой вот тестовый код

#cat test.pl
use DBI;
use warnings;
use strict;

sub main {
    my $dbh=DBI->connect("DBI:Pg:dbname=test","test", "test") or die $DBI::errstr;
    &test($dbh);
    $dbh->disconnect;
}

sub test {
    my $dbh = @_;
    my $sth = $dbh->prepare("select * from tests");
    print $sth->dump_results;
    $sth->finish;
}

приводит к ошибке: Can't call method "prepare" without a package or object reference at test.pl line 13.

Re: perl+dbi, передача dbh в функцию

забыл $sth->execute в функции и &main; в конце
но дела это не меняет

Luigi ()
Вы не можете добавлять комментарии в эту тему. Тема перемещена в архив.