Return-Path: Delivered-To: apmail-perl-modperl-archive@www.apache.org Received: (qmail 10738 invoked from network); 28 Aug 2003 23:45:06 -0000 Received: from daedalus.apache.org (HELO apache.org) (208.185.179.12) by minotaur-2.apache.org with SMTP; 28 Aug 2003 23:45:06 -0000 Received: (qmail 21649 invoked by uid 500); 28 Aug 2003 23:44:17 -0000 Delivered-To: apmail-perl-modperl-archive@perl.apache.org Received: (qmail 21634 invoked by uid 500); 28 Aug 2003 23:44:17 -0000 Mailing-List: contact modperl-help@perl.apache.org; run by ezmlm Precedence: bulk list-help: list-unsubscribe: list-post: Delivered-To: mailing list modperl@perl.apache.org Received: (qmail 21592 invoked from network); 28 Aug 2003 23:44:16 -0000 Message-ID: <1062113329.3f4e9031612f7@webmail.ollinca.net> Date: Thu, 28 Aug 2003 16:28:49 -0700 From: "" To: "" Subject: Apache::DBI MIME-Version: 1.0 Content-Type: text/plain; charset=ISO-8859-1 Content-Transfer-Encoding: 8bit User-Agent: Internet Messaging Program (IMP) 3.2.1 X-Originating-IP: 132.248.209.56 X-Spam-Rating: daedalus.apache.org 1.6.2 0/1000/N X-Spam-Rating: minotaur-2.apache.org 1.6.2 0/1000/N Hello, every body I can run the following subroutine in DBI, but Apache::DBI... use DBI; sub connect{ $dbh = DBI->connect("dbi:Pg:dbname=test", "canis","3dsadasz"); $sth = $dbh->prepare("SELECT clave, denominacion FROM Marca") || die $dbh->errstr; $sth->execute() || die $sth->errstr; while(my $row = $sth->fetch){ my($clave, $nombre) = @$row; print "clave => $clave, denominacion => $nombre\n"; } $dbh->disconnect; } and I have this log... [Thu Aug 28 12:36:44 2003] [error] (2)No such file or directory: mod_mime_magic: can't read magic file /etc/apache-perl/share/magic [Thu Aug 28 12:36:45 2003] [notice] Apache/1.3.26 (Unix) Debian GNU/Linux mod_perl/1.26 configured -- resuming normal operations [Thu Aug 28 12:36:45 2003] [notice] suEXEC mechanism enabled (wrapper: /usr/lib/apache/suexec) [Thu Aug 28 12:36:45 2003] [notice] Accept mutex: sysvsem (Default: sysvsem) [Thu Aug 28 12:37:03 2003] null: DBI->connect(dbname=test) failed: FATAL 1: IDENT authentication failed for user "canis" at /var/lib/perl/JCVA/Conexion.pm line 11 [Thu Aug 28 12:37:03 2003] [error] Can't call method "prepare" on an undefined value at /var/lib/perl/JCVA/Conexion.pm line 13. Somedody knows if the user must be registered in some configuration file? -- Reporting bugs: http://perl.apache.org/bugs/ Mail list info: http://perl.apache.org/maillist/modperl.html