Hi,
I have installed
Oracle 9.0.1
DBI-1.13
DBD-Oracle-1.03
The test script works well when I ran the script on
a remote machine. The script die with "ERROR: -1 'ERROR OCIEnvInit'"
if I ran the script on the same machine that Oracle is
running on? Any idea/ suggestion are very welcome.
James
# My script
#!/net/fmlylib1/mnt/ylib1a/oracle_mnt/localbin/oraperl
$ENV{ORACLE_SID} = "dia3";
$ENV{ORACLE_HOME} = "/u01/app/oracle/product/9.0.1";
$ENV{EPC_DISABLED} = "TRUE";
push(@INC,"/net/fmlylib1/mnt/ylib1a/oracle_mnt/localbin/");
use DBI;
use DBD::Oracle qw(:ora_types);
my $dbname = "dia3"; my $dbuser = "ora_user"; my $dbpass = "ora_user";
my $dbhost = "fmlylib1.fc.hp.com";
my $trace_level = 3; my $trace_filename = "./trace.remo";
DBI->trace($trace_level, $trace_filename);
$dbh = DBI->connect("dbi:Oracle:host=$dbhost;sid=$dbname",$dbuser,$dbpass,
{ PrintError => 0, RaiseError => 0, AutoCommit => 1});
# -------- end of script
# trace from remote running:
DBI 1.19-nothread dispatch trace level set to 3
Note: perl is running without the recommended perl -w option
-> DBI->connect(dbi:Oracle:host=fmlylib1.fc.hp.com;sid=dia3, ora_user, ****,
HASH(0x401036fc))
-> DBI->install_driver(Oracle) for hpux perl=5.00502 pid=25833 ruid=2921 euid=2921
install_driver: DBD::Oracle version 1.03 loaded from DBD/Oracle.pm
New DBI::dr (for DBD::Oracle::dr, parent=, id=)
dbih_setup_handle(DBI::dr=HASH(0x400cf9b4)=>DBI::dr=HASH(0x40116678),
DBD::Oracle::dr, 0, Null!)
dbih_make_com(Null!, DBD::Oracle::dr, 88)
<- install_driver= DBI::dr=HASH(0x400cf9b4)
-> connect for DBD::Oracle::dr (DBI::dr=HASH(0x400cf9b4)~0x40116678
'host=fmlylib1.fc.hp.com;sid=dia3' 'ora_user' **** HASH(0x40103768))
connect using
'(DESCRIPTION=(ADDRESS_LIST=(ADDRESS=(PROTOCOL=tcp)(HOST=fmlylib1.fc.hp.com)(PORT=1526))(ADDRESS=(PROTOCOL=tcp)(HOST=fmlylib1.fc.hp
.com)(PORT=1521)))(CONNECT_DATA=(SID=dia3)))' New DBI::db (for DBD::Oracle::db,
parent=DBI::dr=HASH(0x40116678), id=)
dbih_setup_handle(DBI::db=HASH(0x401165f4)=>DBI::db=HASH(0x401165e8),
DBD::Oracle::db, 400cd6e4, Null!)
dbih_make_com(DBI::dr=HASH(0x40116678), DBD::Oracle::db, 108)
<- connect= DBI::db=HASH(0x401165f4) at DBI.pm line 420
-> STORE for DBD::Oracle::db (DBI::db=HASH(0x401165e8)~INNER 'RaiseError' 0)
STORE DBI::db=HASH(0x401165e8) 'RaiseError' => 0
# trace when running on the same machine
DBI 1.19-nothread dispatch trace level set to 3
Note: perl is running without the recommended perl -w option
-> DBI->connect(dbi:Oracle:host=fmlylib1.fc.hp.com;sid=dia3, ora_user, ****,
HASH(0x40103ae0))
-> DBI->install_driver(Oracle) for hpux perl=5.00502 pid=6098 ruid=30558 euid=30558
install_driver: DBD::Oracle version 1.03 loaded from DBD/Oracle.pm
New DBI::dr (for DBD::Oracle::dr, parent=, id=)
dbih_setup_handle(DBI::dr=HASH(0x400ccdb8)=>DBI::dr=HASH(0x4010425c),
DBD::Oracle::dr, 0, Null!)
dbih_make_com(Null!, DBD::Oracle::dr, 88)
<- install_driver= DBI::dr=HASH(0x400ccdb8)
-> connect for DBD::Oracle::dr (DBI::dr=HASH(0x400ccdb8)~0x4010425c
'host=fmlylib1.fc.hp.com;sid=dia3' 'ora_user' **** HASH(0x40103b4c))
connect using
'(DESCRIPTION=(ADDRESS_LIST=(ADDRESS=(PROTOCOL=tcp)(HOST=fmlylib1.fc.hp.com)(PORT=1526))(ADDRESS=(PROTOCOL=tcp)(HOST=fmlylib1.fc.hp
.com)(PORT=1521)))(CONNECT_DATA=(SID=dia3)))' New DBI::db (for DBD::Oracle::db,
parent=DBI::dr=HASH(0x4010425c), id=)
dbih_setup_handle(DBI::db=HASH(0x401041d8)=>DBI::db=HASH(0x401041cc),
DBD::Oracle::db, 400ccaf8, Null!)
dbih_make_com(DBI::dr=HASH(0x4010425c), DBD::Oracle::db, 108)
ERROR EVENT -1 'ERROR OCIEnvInit' on DBI::db=HASH(0x401041d8)
!! ERROR: -1 'ERROR OCIEnvInit'
<- connect= undef at DBI.pm line 420
-> errstr in DBD::_::common for DBD::Oracle::dr
(DBI::dr=HASH(0x400ccdb8)~0x4010425c)
<- errstr= 'ERROR OCIEnvInit' at DBI.pm line 421
DBI->connect(host=fmlylib1.fc.hp.com;sid=dia3) failed: ERROR OCIEnvInit
--
