On Wed, 2009-04-01 at 12:54 -0500, Scott T. Hildreth wrote: > Wanted to change the subject. > > > On Wed, 2009-04-01 at 11:11 -0500, Scott T. Hildreth wrote: > > Hello, > > > > I'm having a strange problem. I compiled 5.8.9 on SUSE Linux > > Enterprise Server 10 (x86_64), > > installed DBI & DBD::Oracle. We are running Oracle 11g on this server. > > Running a program that > > uses DBI/DBD::Oracle, the process locked the server up by using all the > > memory and swap. The server > > has 32 gig of memory and I believe 16 gig of swap. Running in the > > debugger, I isolated the problem in > > DBD/Oracle.pm, > >
So, I asked our Dba to install the 10g client for me. I recompiled DBD::Oracle using the 10g client. Ran the same code and wa la. I really am not liking the 11g client libraries. > > my $oci = DBD::Oracle::ORA_OCI(); > > > > sub AUTOLOAD { > > (my $constname = $AUTOLOAD) =~ s/.*:://; > > my $val = constant($constname); > > *$AUTOLOAD = sub { $val }; > > goto &$AUTOLOAD; > > } > > > > AUTOLOAD loads DBD::Oracle::ORA_OCI, which triggers the loading of > > DBD::Oracle::constant. > > DBD::Oracle::constant is not found, so constant is loaded, not found, > > constant loaded....etc > > I checked Oracle.so (just in case for some crazy reason constant didn't get > > in the so) it's > > there. What perplexes me is this perl install is the just like several > > other servers we have. > > The one big difference is there is an 11g Oracle server running on this > > box. I have the same > > set up on an open-SuSE box that works fine, but it is only using the 11g > > client. The only problems > > I had when compiling DBD::Oracle was the lob-plsql test failing, otherwise > > everything worked fine. > > I don't even know if Oracle is the issue here. Should I post to P5P? > > > > Thanks > > Scott > > > > Summary of my perl5 (revision 5 version 8 subversion 9) configuration: > > Platform: > > osname=linux, osvers=2.6.27.19, archname=x86_64-linux > > uname='linux srv12 2.6.27.19 #1 smp mon feb 23 16:46:24 cst 2009 > > x86_64 x86_64 x86_64 gnulinux ' > > config_args='-de -Dprefix=/usr/local/perl-5.8.9 > > -Dnoextensions=ODBM_File -Dlibpth=/usr/local/lib64 /lib64 /usr/lib64 > > -Dldflags=-L/usr/local/lib64 -Duse64bitall=define' > > hint=recommended, useposix=true, d_sigaction=define > > usethreads=undef use5005threads=undef useithreads=undef > > usemultiplicity=undef > > useperlio=define d_sfio=undef uselargefiles=define usesocks=undef > > use64bitint=define use64bitall=define uselongdouble=undef > > usemymalloc=n, bincompat5005=undef > > Compiler: > > cc='cc', ccflags ='-fno-strict-aliasing -pipe -I/usr/local/include > > -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64', > > optimize='-O2', > > cppflags='-fno-strict-aliasing -pipe -I/usr/local/include' > > ccversion='', gccversion='4.1.2 20070115 (SUSE Linux)', gccosandvers='' > > intsize=4, longsize=8, ptrsize=8, doublesize=8, byteorder=12345678 > > d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=16 > > ivtype='long', ivsize=8, nvtype='double', nvsize=8, Off_t='off_t', > > lseeksize=8 > > alignbytes=8, prototype=define > > Linker and Libraries: > > ld='cc', ldflags =' -L/usr/local/lib' > > libpth=/usr/local/lib /lib /usr/lib /lib64 /usr/lib64 /usr/local/lib64 > > libs=-lnsl -lgdbm -ldb -ldl -lm -lcrypt -lutil -lc > > perllibs=-lnsl -ldl -lm -lcrypt -lutil -lc > > libc=/lib/libc-2.4.so, so=so, useshrplib=false, libperl=libperl.a > > gnulibc_version='2.4' > > Dynamic Linking: > > dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags='-Wl,-E' > > cccdlflags='-fPIC', lddlflags='-shared -O2 -L/usr/local/lib' > > > > > > Characteristics of this binary (from libperl): > > Compile-time options: PERL_MALLOC_WRAP USE_64_BIT_ALL USE_64_BIT_INT > > USE_FAST_STDIO USE_LARGE_FILES USE_PERLIO > > Built under linux > > Compiled at Mar 31 2009 10:07:10 > > %ENV: > > PERL5LIB="/usr/local/lib/tools/perlmodules" > > @INC: > > /usr/local/lib/tools/perlmodules > > /usr/local/perl-5.8.9/lib/5.8.9/x86_64-linux > > /usr/local/perl-5.8.9/lib/5.8.9 > > /usr/local/perl-5.8.9/lib/site_perl/5.8.9/x86_64-linux > > /usr/local/perl-5.8.9/lib/site_perl/5.8.9 > > . > > > >