Hi,
I'm trying to run some perl (currently 5.00503) on AIX 4.3 to connect an
Oracle 8 database on the same system (DBD::Oracle is 1.06)
My problem is that I want to use the "HandleError" method of DBI but I
only find a pre-compiled version of DBI 1.14 which doens't have this
method yet.
As I can't compile anything on this system, I'm trying to use
DBI::PurePerl (I don't need performance and only want to do a SELECT and
some little UPDATE).
With this little script, I got an error :
Use of uninitialized value at
/usr/opt/perl5/lib/5.00503/aix/DynaLoader.pm line 188.
error: install_driver(Oracle) failed: Unable to get DBI state. DBI not
loaded. at /usr/opt/perl5/lib/5.00503/aix/DynaLoader.pm line 188.
at testoracle.pl line 15
BEGIN {
$ENV{DBI_PUREPERL} = 2;
$ENV{ORACLE_HOME} = "/oracle";
unshift @INC, 'lib';
}
use strict;
use DBI;
my $dbh;
eval {
$dbh = DBI->connect(
"DBI:Oracle:sid=ORCL;port=1521;host=oracle_host",
"username",
"password"
);
};
if ( $@ ) {
print "error: $@\n";
}