You could try
BEGIN {
$ENV{"ORACLE_HOME"}="/quiq/share/OracleClient";
$ENV{"LD_LIBRARY_PATH"}="/quiq/share/OracleClient/lib";
}
in your script.
--
David Adams
Computing Services
Southampton University
----- Original Message -----
From: "Raj Srinivasan" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>; <[EMAIL PROTECTED]>
Sent: Tuesday, April 24, 2001 12:14 AM
Subject: DBD:Oracle - LD_LIBRARY_PATH doesn't work...
> Hi,
>
> I am building perl for distribution on several machines and I am having
> difficulties in using DBD:Oracle with that build.
>
> I have installed the DBD:oracle after setting up ORACLE_HOME and
> LD_LIBRARY_PATH.
> "make test" didn't report any errors. Available_drivers returns "Oracle"
> driver as installed.
>
> Driver: Oracle
> Data Source is dbi:Oracle:DMART01.world
> Data Source is dbi:Oracle:QA01.world
> Data Source is dbi:Oracle:QA02.world
> Data Source is dbi:Oracle:QUIQ.world
> Data Source is dbi:Oracle:TST01.world
>
> Now the question is...
>
> If I declare the LD_LIBRARY_PATH as my shell env variable, I could able
> to make connection to the oracle database.
>
> If I declare the LD_LIBRARY_PATH as part of the script, the connection
> don't go thru.
>
> #!/netapp01/repository/perl/bin/perl -w
> $ENV{"ORACLE_HOME"}="/quiq/share/OracleClient";
> $ENV{"LD_LIBRARY_PATH"}="/quiq/share/OracleClient/lib";
>
>
> Do I have to install DBD for oracle differently.
> Am I doing anything wrong? Any ideas?
>
> Thanks.. Raj
> ====================================================================
>
> $ /netapp01/repository/perl/bin/perl -V
> Summary of my perl5 (revision 5.0 version 6 subversion 1) configuration:
> Platform:
> osname=linux, osvers=2.2.14-va.2.1smp, archname=i686-linux
> uname='linux selma.west.quiq.com 2.2.14-va.2.1smp #1 smp mon jul 31
> 21:53:20 pdt 2000 i686 unknown '
> config_args='-Dprefix=/netapp01/repository/perl -des'
> hint=recommended, useposix=true, d_sigaction=define
> usethreads=undef use5005threads=undef useithreads=undef
> usemultiplicity=undef
> useperlio=undef d_sfio=undef uselargefiles=define usesocks=undef
> use64bitint=undef use64bitall=undef uselongdouble=undef
> Compiler:
> cc='cc', ccflags ='-fno-strict-aliasing -D_LARGEFILE_SOURCE
> -D_FILE_OFFSET_BITS=64',
> optimize='-O2',
> cppflags='-fno-strict-aliasing'
> ccversion='', gccversion='egcs-2.91.66 19990314/Linux (egcs-1.1.2
> release)', gccosandvers=''
> intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=1234
> d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=12
> ivtype='long', ivsize=4, nvtype='double', nvsize=8, Off_t='off_t',
> lseeksize=8
> alignbytes=4, usemymalloc=n, prototype=define
> Linker and Libraries:
> ld='cc', ldflags =' -L/usr/local/lib'
> libpth=/usr/local/lib /lib /usr/lib
> libs=-lnsl -lndbm -lgdbm -ldb -ldl -lm -lc -lposix -lcrypt -lutil
> perllibs=-lnsl -ldl -lm -lc -lposix -lcrypt -lutil
> libc=/lib/libc-2.1.3.so, so=so, useshrplib=false, libperl=libperl.a
> Dynamic Linking:
> dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags='-rdynamic'
> cccdlflags='-fpic', lddlflags='-shared -L/usr/local/lib'
>
>
> Characteristics of this binary (from libperl):
> Compile-time options: USE_LARGE_FILES
> Built under linux
> Compiled at Apr 23 2001 10:34:09
> @INC:
> /netapp01/repository/perl/lib/5.6.1/i686-linux
> /netapp01/repository/perl/lib/5.6.1
> /netapp01/repository/perl/lib/site_perl/5.6.1/i686-linux
> /netapp01/repository/perl/lib/site_perl/5.6.1
> /netapp01/repository/perl/lib/site_perl
> .
>