List:General Discussion« Previous MessageNext Message »
From:Richard Reina Date:August 2 1999 3:00am
Subject:Perl script DBI error
View as plain text  
I have written the fowwing script to see if DBI is working.

#!/usr/bin/perl

use DBI;
use strict;
my $dbh = DBI->connect('DBI:mysql:rush_load', 'root',
                       'rr8663');

die "connect failed: $DBI::errstr" unless $dbh;

my $sth = $dbh->prepare("insert into tablename
                       (name,email,phone_number)
                       values
                       ('Bill Watkins','Bill@stripped','601-353-8671')
                       ");

die "prepare failed:", $dbh->errstr unless $sth;

$sth->execute;

$sth->execute or die "execute failed:", $sth->errstr;

$dbh->disconnect;

When I run it I get the following error:

[root@localhost DBI-1.08]# perl rush2.pl
Can't locate loadable object for module DBI in @INC (@INC contains:
/usr/lib/perl5/i386-linux/5.00404 /usr/lib/perl5
/usr/lib/perl5/site_perl/i386-linux /usr/lib/perl5/site_perl .) at
DBI.pm line 0
BEGIN failed--compilation aborted at DBI.pm line 150.
BEGIN failed--compilation aborted at rush2.pl line 3.

I have installed the DBI module in the following directory:

[root@localhost DBI-1.08]# pwd
/usr/bin/DBI-1.08
[root@localhost DBI-1.08]# ls -la
total 365
drwxr-xr-x   6 300      wheel        1024 Aug  1 21:55 .
drwxr-xr-x   3 root     root        13312 Jul 29 21:33 ..
-r--r--r--   1 300      wheel       23886 May 12 20:44 Changes
-r--r--r--   1 300      wheel      124877 May 12 20:44 DBI.pm
-r--r--r--   1 300      wheel       74387 May 12 20:44 DBI.xs
-r--r--r--   1 300      wheel       15843 May  8 20:14 DBIXS.h
-r--r--r--   1 300      wheel       11537 May  8 20:14 Driver.xst
-r--r--r--   1 300      wheel        1659 Apr  9 16:49 MANIFEST
-rw-r--r--   1 root     root        25731 Jul 14 21:24 Makefile
-r-xr-xr-x   1 300      wheel        6605 Jan  5  1999 Makefile.PL
-rw-r--r--   1 root     root        17383 Jul 13 22:19 Perl.c
-r--r--r--   1 300      wheel         394 Jan  3  1999 Perl.xs
-rw-r--r--   1 root     root        11485 Jul 13 22:19 Perl.xsi
-r--r--r--   1 300      wheel        5013 Apr  9 16:50 README
-r--r--r--   1 300      wheel        5472 May 12 20:44 ToDo
drwxr-xr-x   6 root     root         1024 Jul 13 22:18 blib
-r--r--r--   1 300      wheel        2050 Jan  1  1999 dbd_xsh.h
-r--r--r--   1 300      wheel        1374 Aug 14  1998 dbi_sql.h
-r--r--r--   1 300      wheel        5500 Apr  9 16:51 dbiproxy.PL
-r--r--r--   1 300      wheel         741 Aug 14  1998 dbish.PL
drwxr-xr-x   6 300      wheel        1024 May 12 20:45 lib
-rw-r--r--   1 root     root            0 Jul 13 22:19 pm_to_blib
-rw-r--r--   1 root     root          543 Jul 29 21:00 rush2.pl
drwxr-xr-x   2 300      wheel        1024 May 12 20:45 t
drwxr-xr-x   2 root     root         1024 Jun 24 21:52 test
-r--r--r--   1 300      wheel        3416 Jan  1  1999 test.pl

Can anyone please tell me what I have done wrong and what I must do to
fix it.

Thread
Perl script DBI errorRichard Reina2 Aug
  • Re: Perl script DBI error(Steven Fletcher)2 Aug