On Nov 12, 8:24 am, sco...@pythian.com (John Scoles) wrote: > If you can run this with > > dbd_verbose=>15 > > on the connect string the post the results it my help us find an answer. > > Cheers > John Scoles
John, I added dbd_verbose but that didn't print any debugging info :( DBI->connect( 'dbi:Oracle:AHST90', 'ahs', 'ahsgc', {dbd_verbose => 15} ) I ran the script with DBI_TRACE=15 and got the following info. I edited the output below and removed user login and SID. I appreciate any help. -bash-3.00$ DBI_TRACE=15 perl -w test.db.pl DBI 1.53-nothread default trace level set to 0x0/15 (pid 28069) 0x2a00 DBI::db::get_info install_method DBI::db::get_info , flags 0x2a00, usage: min 2, max 2, '$info_type' 0x0000 DBI::db::take_imp_data install_method DBI::db::take_imp_data, usage: min 1, max 1, '' 0x0c00 DBI::db::disconnect install_method DBI::db::disconnect , flags 0x0c00, usage: min 1, max 1, '' 0x2000 DBI::db::selectrow_array install_method DBI::db::selectrow_array, flags 0x2000, usage: min 2, max 0, '$statement [, \%attr [, @bind_params ] ]' 0x2200 DBI::db::tables install_method DBI::db::tables , flags 0x2200, usage: min 1, max 6, '$catalog, $schema, $table, $type [, \ %attr ]' 0x0430 DBI::db::quote_identifier install_method DBI::db::quote_identifier, flags 0x0430, usage: min 2, max 6, '$name [, ...] [, \%attr ]' 0x0000 DBI::db::clone install_method DBI::db::clone , usage: min 1, max 2, '[\%attr]' 0x0430 DBI::db::quote install_method DBI::db::quote , flags 0x0430, usage: min 2, max 3, '$string [, $data_type ]' 0x2200 DBI::db::type_info install_method DBI::db::type_info , flags 0x2200, usage: min 1, max 2, '$data_type' 0x2a00 DBI::db::statistics_info install_method DBI::db::statistics_info, flags 0x2a00, usage: min 6, max 7, '$catalog, $schema, $table, $unique_only, $quick, [, \%attr ]' 0x2000 DBI::db::selectrow_arrayref install_method DBI::db::selectrow_arrayref, flags 0x2000, usage: min 2, max 0, '$statement [, \%attr [, @bind_params ] ]' 0x0400 DBI::db::begin_work install_method DBI::db::begin_work , flags 0x0400, usage: min 1, max 2, '[ \%attr ]' 0x2800 DBI::db::last_insert_id install_method DBI::db::last_insert_id, flags 0x2800, usage: min 5, max 6, '$catalog, $schema, $table_name, $field_name [, \%attr ]' 0x2a00 DBI::db::foreign_key_info install_method DBI::db::foreign_key_info, flags 0x2a00, usage: min 7, max 8, '$pk_catalog, $pk_schema, $pk_table, $fk_catalog, $fk_schema, $fk_table [, \%attr ]' 0x2200 DBI::db::primary_key install_method DBI::db::primary_key , flags 0x2200, usage: min 4, max 5, '$catalog, $schema, $table [, \%attr ]' 0x0c80 DBI::db::commit install_method DBI::db::commit , flags 0x0c80, usage: min 1, max 1, '' 0x0404 DBI::db::ping install_method DBI::db::ping , flags 0x0404, usage: min 1, max 1, '' 0x2000 DBI::db::selectall_arrayref install_method DBI::db::selectall_arrayref, flags 0x2000, usage: min 2, max 0, '$statement [, \%attr [, @bind_params ] ]' 0x2a00 DBI::db::type_info_all install_method DBI::db::type_info_all, flags 0x2a00, usage: min 1, max 1, '' 0x3200 DBI::db::do install_method DBI::db::do , flags 0x3200, usage: min 2, max 0, '$statement [, \%attr [, @bind_params ] ]' 0x2000 DBI::db::selectcol_arrayref install_method DBI::db::selectcol_arrayref, flags 0x2000, usage: min 2, max 0, '$statement [, \%attr [, @bind_params ] ]' 0x2200 DBI::db::prepare_cached install_method DBI::db::prepare_cached, flags 0x2200, usage: min 2, max 4, '$statement [, \%attr [, $if_active ] ]' 0x0004 DBI::db::rows install_method DBI::db::rows , flags 0x0004 0x0c80 DBI::db::rollback install_method DBI::db::rollback , flags 0x0c80, usage: min 1, max 1, '' 0x2a00 DBI::db::column_info install_method DBI::db::column_info , flags 0x2a00, usage: min 5, max 6, '$catalog, $schema, $table, $column [, \ %attr ]' 0x2a00 DBI::db::table_info install_method DBI::db::table_info , flags 0x2a00, usage: min 1, max 6, '$catalog, $schema, $table, $type [, \ %attr ]' 0x2a00 DBI::db::primary_key_info install_method DBI::db::primary_key_info, flags 0x2a00, usage: min 4, max 5, '$catalog, $schema, $table [, \%attr ]' 0x2200 DBI::db::prepare install_method DBI::db::prepare , flags 0x2200, usage: min 2, max 3, '$statement [, \%attr]' 0x0000 DBI::db::preparse install_method DBI::db::preparse 0x0100 DBI::db::connected install_method DBI::db::connected , flags 0x0100 0x0200 DBI::db::data_sources install_method DBI::db::data_sources, flags 0x0200, usage: min 1, max 2, '[\%attr]' 0x2000 DBI::db::selectall_hashref install_method DBI::db::selectall_hashref, flags 0x2000, usage: min 3, max 0, '$statement, $keyfield [, \%attr [, @bind_params ] ]' 0x2000 DBI::db::selectrow_hashref install_method DBI::db::selectrow_hashref, flags 0x2000, usage: min 2, max 0, '$statement [, \%attr [, @bind_params ] ]' 0x0000 DBI::dr::default_user install_method DBI::dr::default_user, usage: min 3, max 4, '$user, $pass [, \%attr]' 0x0800 DBI::dr::data_sources install_method DBI::dr::data_sources, flags 0x0800, usage: min 1, max 2, '[\%attr]' 0x0800 DBI::dr::disconnect_all install_method DBI::dr::disconnect_all, flags 0x0800, usage: min 1, max 1, '' 0x0000 DBI::dr::connect_cached install_method DBI::dr::connect_cached, H 0, usage: min 1, max 5, '[$db [,$user [,$passwd [,\%attr]]]]' 0x0000 DBI::dr::connect install_method DBI::dr::connect , H 0, usage: min 1, max 5, '[$db [,$user [,$passwd [,\%attr]]]]' 0x0000 DBI::st::more_results install_method DBI::st::more_results, usage: min 1, max 1, '' 0x0000 DBI::st::blob_read install_method DBI::st::blob_read , usage: min 4, max 5, '$field, $offset, $len [, \$buf [, $bufoffset]]' 0x0000 DBI::st::fetchall_hashref install_method DBI::st::fetchall_hashref, usage: min 2, max 2, '$key_field' 0x0000 DBI::st::bind_param_inout_array install_method DBI::st::bind_param_inout_array, usage: min 4, max 5, '$parameter, \...@var, $maxlen, [, \%attr]' 0x0000 DBI::st::finish install_method DBI::st::finish , usage: min 1, max 1, '' 0x0004 DBI::st::rows install_method DBI::st::rows , flags 0x0004 0x5040 DBI::st::execute_for_fetch install_method DBI::st::execute_for_fetch, flags 0x5040, usage: min 2, max 3, '$fetch_sub [, $tuple_status]' 0x0000 DBI::st::fetchrow_hashref install_method DBI::st::fetchrow_hashref 0x0000 DBI::st::_get_fbav install_method DBI::st::_get_fbav 0x0000 DBI::st::_set_fbav install_method DBI::st::_set_fbav , T 0 0x0000 DBI::st::fetchrow install_method DBI::st::fetchrow 0x0000 DBI::st::fetch install_method DBI::st::fetch 0x5040 DBI::st::execute_array install_method DBI::st::execute_array, flags 0x5040, usage: min 2, max 0, '\%attribs [, @args]' 0x0000 DBI::st::dump_results install_method DBI::st::dump_results, usage: min 1, max 5, '$maxfieldlen, $linesep, $fieldsep, $filehandle' 0x0000 DBI::st::bind_param_array install_method DBI::st::bind_param_array, usage: min 3, max 4, '$parameter, $var [, \%attr]' 0x0000 DBI::st::fetchrow_array install_method DBI::st::fetchrow_array 0x1040 DBI::st::execute install_method DBI::st::execute , flags 0x1040, usage: min 1, max 0, '[...@args]' 0x0000 DBI::st::bind_col install_method DBI::st::bind_col , usage: min 3, max 4, '$column, \$var [, \%attr]' 0x0000 DBI::st::fetchall_arrayref install_method DBI::st::fetchall_arrayref, usage: min 1, max 3, '[ $slice [, $max_rows]]' 0x0000 DBI::st::fetchrow_arrayref install_method DBI::st::fetchrow_arrayref 0x0000 DBI::st::bind_param_inout install_method DBI::st::bind_param_inout, usage: min 4, max 5, '$parameter, \$var, $maxlen, [, \%attr]' 0x0000 DBI::st::bind_columns install_method DBI::st::bind_columns, usage: min 2, max 0, '\$var1 [, \$var2, ...]' 0x0800 DBI::st::cancel install_method DBI::st::cancel , flags 0x0800, usage: min 1, max 1, '' 0x0000 DBI::st::blob_copy_to_file install_method DBI::st::blob_copy_to_file, usage: min 3, max 3, '$field, $filename_or_handleref' 0x0000 DBI::st::bind_param install_method DBI::st::bind_param , usage: min 3, max 4, '$parameter, $var [, \%attr]' 0x0404 DBI::common::parse_trace_flag install_method DBI::common::parse_trace_flag, flags 0x0404, T 0, usage: min 2, max 2, '$name' 0x0004 DBI::common::errstr install_method DBI::common::errstr , flags 0x0004 0x0004 DBI::common::trace_msg install_method DBI::common::trace_msg, flags 0x0004, T 0, usage: min 2, max 3, '$message_text [, $min_level ]' 0x0004 DBI::common::err install_method DBI::common::err , flags 0x0004 0x0004 DBI::common::CLEAR install_method DBI::common::CLEAR , flags 0x0004 0x0004 DBI::common::state install_method DBI::common::state , flags 0x0004 0x0000 DBI::common::_not_impl install_method DBI::common::_not_impl 0x0004 DBI::common::NEXTKEY install_method DBI::common::NEXTKEY , flags 0x0004 0x0004 DBI::common::trace install_method DBI::common::trace , flags 0x0004, usage: min 1, max 3, '[$trace_level, [$filename]]' 0x0004 DBI::common::debug install_method DBI::common::debug , flags 0x0004, usage: min 1, max 2, '[$debug_level]' 0x0404 DBI::common::parse_trace_flags install_method DBI::common::parse_trace_flags, flags 0x0404, T 0, usage: min 2, max 2, '$flags' 0x0000 DBI::common::swap_inner_handle install_method DBI::common::swap_inner_handle, usage: min 2, max 3, '$h [, $allow_reparent ]' 0x0004 DBI::common::EXISTS install_method DBI::common::EXISTS , flags 0x0004 0x0404 DBI::common::FETCH install_method DBI::common::FETCH , flags 0x0404 0x0004 DBI::common::FIRSTKEY install_method DBI::common::FIRSTKEY, flags 0x0004 0x0010 DBI::common::set_err install_method DBI::common::set_err , flags 0x0010, usage: min 3, max 6, '$err, $errmsg [, $state, $method, $rv]' 0x0004 DBI::common::DESTROY install_method DBI::common::DESTROY , flags 0x0004 0x0004 DBI::common::dump_handle install_method DBI::common::dump_handle, flags 0x0004, usage: min 1, max 3, '[$message [, $level]]' 0x0100 DBI::common::can install_method DBI::common::can , flags 0x0100 0x041c DBI::common::STORE install_method DBI::common::STORE , flags 0x041c 0x0004 DBI::common::private_data install_method DBI::common::private_data, flags 0x0004, usage: min 1, max 1, '' 0x0006 DBI::common::func install_method DBI::common::func , flags 0x0006 -> DBI->connect(dbi:Oracle:<DELETED>, <DELETED>, ****, HASH(0x229e8)) -> DBI->install_driver(Oracle) for solaris perl=5.008004 pid=28069 ruid=100 euid=100 install_driver: DBD::Oracle version 1.16 loaded from /usr/perl5/ site_perl/5.8.4/sun4-solaris-64int/DBD/Oracle.pm New DBI::dr (for DBD::Oracle::dr, parent=, id=) dbih_setup_handle(DBI::dr=HASH(0x1188f8)=>DBI::dr=HASH(0xd5b14), DBD::Oracle::dr, 0, Null!) dbih_make_com(Null!, 0, DBD::Oracle::dr, 120, 0) thr#0 dbih_setup_attrib(DBI::dr=HASH(0xd5b14), Err, Null!) SCALAR(0x282e0) (already defined) dbih_setup_attrib(DBI::dr=HASH(0xd5b14), State, Null!) SCALAR(0x118a9c) (already defined) dbih_setup_attrib(DBI::dr=HASH(0xd5b14), Errstr, Null!) SCALAR(0x28280) (already defined) dbih_setup_attrib(DBI::dr=HASH(0xd5b14), TraceLevel, Null!) 0 (already defined) dbih_setup_attrib(DBI::dr=HASH(0xd5b14), FetchHashKeyName, Null!) 'NAME' (already defined) >> STORE DISPATCH (DBI::dr=HASH(0x1188f8) rc1/1 @3 g0 ima41c pid#28069) at /usr/perl5/site_perl/5.8.4/sun4-solaris-64int/DBD/ Oracle.pm line 61 -> STORE in DBD::_::common for DBD::Oracle::dr (DBI::dr=HASH(0x1188f8)~0xd5b14 'ShowErrorStatement' 1) STORE DBI::dr=HASH(0xd5b14) 'ShowErrorStatement' => 1 <- STORE= 1 at /usr/perl5/site_perl/5.8.4/sun4-solaris-64int/DBD/ Oracle.pm line 61 install_method DBI::db::ora_lob_read install_method DBI::db::ora_lob_write install_method DBI::db::ora_lob_append install_method DBI::db::ora_lob_trim install_method DBI::db::ora_lob_length install_method DBI::db::ora_nls_parameters install_method DBI::db::ora_can_unicode <- install_driver= DBI::dr=HASH(0x1188f8) >> connect DISPATCH (DBI::dr=HASH(0x1188f8) rc2/3 @5 g0 ima1 pid#28069) at /usr/perl5/site_perl/5.8.4/sun4-solaris-64int/DBI.pm line 625 -> connect for DBD::Oracle::dr (DBI::dr=HASH(0x1188f8)~0xd5b14 '<DELETED>' '<DELETED>' **** HASH(0x1a153c)) New DBI::db (for DBD::Oracle::db, parent=DBI::dr=HASH(0xd5b14), id=) dbih_setup_handle(DBI::db=HASH(0xd5ae4)=>DBI::db=HASH(0x1a1590), DBD::Oracle::db, 116588, Null!) dbih_make_com(DBI::dr=HASH(0xd5b14), 3d3c0, DBD::Oracle::db, 144, 0) thr#0 dbih_setup_attrib(DBI::db=HASH(0x1a1590), Err, DBI::dr=HASH(0xd5b14)) SCALAR(0x11c180) (already defined) dbih_setup_attrib(DBI::db=HASH(0x1a1590), State, DBI::dr=HASH(0xd5b14)) SCALAR(0x11c1e0) (already defined) dbih_setup_attrib(DBI::db=HASH(0x1a1590), Errstr, DBI::dr=HASH(0xd5b14)) SCALAR(0x11c1b0) (already defined) dbih_setup_attrib(DBI::db=HASH(0x1a1590), TraceLevel, DBI::dr=HASH(0xd5b14)) 0 (already defined) dbih_setup_attrib(DBI::db=HASH(0x1a1590), FetchHashKeyName, DBI::dr=HASH(0xd5b14)) 'NAME' (already defined) dbih_setup_attrib(DBI::db=HASH(0x1a1590), HandleSetErr, DBI::dr=HASH(0xd5b14)) undef (not defined) dbih_setup_attrib(DBI::db=HASH(0x1a1590), HandleError, DBI::dr=HASH(0xd5b14)) undef (not defined) Environment variables: DBI_TRACE=15 MANPATH=/opt/SUNWspro/man TERM=xterm SHELL=/usr/bin/bash SSH_CLIENT=172.28.2.66 1244 22 OLDPWD=/export/home SSH_TTY=/dev/pts/5 USER=webdev LD_LIBRARY_PATH=/opt/instantclient10_1 TNS_ADMIN=/opt/instantclient10_1 MAIL=/var/mail//webdev PATH=/usr/bin:/opt/SUNWspro/bin:/opt/instantclient10_1:/usr/ ccs/bin PWD=/export/home/webdev JAVA_HOME=/usr/java TZ=US/Eastern SHLVL=1 HOME=/export/home/webdev LOGNAME=webdev SSH_CONNECTION=172.28.2.66 1244 172.28.1.40 22 ORACLE_HOME=/opt/instantclient10_1 _=/usr/bin/perl OCIInitialize(2,0,0,0,0)=SUCCESS OCIEnvInit(1a1b94,0,0,0)=SUCCESS OCIHandleAlloc(22ca40,1a1b98,OCI_HTYPE_ERROR,0,0)=SUCCESS OCIAttrGet(22ca40,OCI_HTYPE_ENV,fef7dd7c,0,31,2443b0)=SUCCESS OCIAttrGet(22ca40,OCI_HTYPE_ENV,fef7dd7e,0,262,2443b0)=SUCCESS charsetid=1 ncharsetid=1 (csid: utf8=871 al32utf8=873) OCIHandleAlloc(22ca40,1a1b9c,OCI_HTYPE_SERVER,0,0)=SUCCESS OCIHandleAlloc(22ca40,1a1ba0,OCI_HTYPE_SVCCTX,0,0)=SUCCESS OCIServerAttach(24493c, 2443b0, "<DELETED>", 6, 0)=SUCCESS OCIAttrSet(24433c,OCI_HTYPE_SVCCTX,24493c,0,6,2443b0)=SUCCESS OCIHandleAlloc(22ca40,1a1ba4,OCI_HTYPE_SESSION,0,0)=SUCCESS OCIAttrSet(24d630,OCI_HTYPE_SESSION, 19d710,3,22,2443b0)=SUCCESS OCIAttrSet(24d630,OCI_HTYPE_SESSION, 19d720,5,23,2443b0)=SUCCESS OCISessionBegin(24433c,2443b0,24d630,1,0)=SUCCESS OCIAttrSet(24433c,OCI_HTYPE_SVCCTX,24d630,0,7,2443b0)=SUCCESS <- connect= DBI::db=HASH(0xd5ae4) at /usr/perl5/site_perl/5.8.4/ sun4-solaris-64int/DBI.pm line 625 >> STORE DISPATCH (DBI::db=HASH(0x1a1590) rc2/1 @3 g0 ima41c pid#28069) at /usr/perl5/site_perl/5.8.4/sun4-solaris-64int/DBI.pm line 672 -> STORE for DBD::Oracle::db (DBI::db=HASH(0x1a1590)~INNER 'PrintError' 1) STORE DBI::db=HASH(0x1a1590) 'PrintError' => 1 <- STORE= 1 at /usr/perl5/site_perl/5.8.4/sun4-solaris-64int/ DBI.pm line 672 >> STORE DISPATCH (DBI::db=HASH(0x1a1590) rc2/1 @3 g0 ima41c pid#28069) at /usr/perl5/site_perl/5.8.4/sun4-solaris-64int/DBI.pm line 672 -> STORE for DBD::Oracle::db (DBI::db=HASH(0x1a1590)~INNER 'AutoCommit' 1) <- STORE= 1 at /usr/perl5/site_perl/5.8.4/sun4-solaris-64int/ DBI.pm line 672 >> STORE DISPATCH (DBI::db=HASH(0x1a1590) rc2/1 @3 g0 ima41c pid#28069) at /usr/perl5/site_perl/5.8.4/sun4-solaris-64int/DBI.pm line 675 via at test.db.pl line 3 -> STORE for DBD::Oracle::db (DBI::db=HASH(0x1a1590)~INNER 'dbd_verbose' 15) STORE DBI::db=HASH(0x1a1590) 'dbd_verbose' => 15 <- STORE= 1 at /usr/perl5/site_perl/5.8.4/sun4-solaris-64int/ DBI.pm line 675 via at test.db.pl line 3 >> FETCH DISPATCH (DBI::db=HASH(0x1a1590) rc2/1 @2 g0 ima404 pid#28069) at /usr/perl5/site_perl/5.8.4/sun4-solaris-64int/DBI.pm line 675 <> FETCH= 15 ('dbd_verbose' from cache) at /usr/perl5/site_perl/ 5.8.4/sun4-solaris-64int/DBI.pm line 675 >> STORE DISPATCH (DBI::db=HASH(0x1a1590) rc2/1 @3 g0 ima41c pid#28069) at /usr/perl5/site_perl/5.8.4/sun4-solaris-64int/DBI.pm line 675 via at test.db.pl line 3 -> STORE for DBD::Oracle::db (DBI::db=HASH(0x1a1590)~INNER 'Username' '<DELETED>') STORE DBI::db=HASH(0x1a1590) 'Username' => '<DELETED>' <- STORE= 1 at /usr/perl5/site_perl/5.8.4/sun4-solaris-64int/ DBI.pm line 675 via at test.db.pl line 3 >> FETCH DISPATCH (DBI::db=HASH(0x1a1590) rc2/1 @2 g0 ima404 pid#28069) at /usr/perl5/site_perl/5.8.4/sun4-solaris-64int/DBI.pm line 675 <> FETCH= '<DELETED>' ('Username' from cache) at /usr/perl5/ site_perl/5.8.4/sun4-solaris-64int/DBI.pm line 675 <- connect= DBI::db=HASH(0xd5ae4) >> STORE DISPATCH (DBI::db=HASH(0x1a1590) rc2/1 @3 g0 ima41c pid#28069) at /usr/perl5/site_perl/5.8.4/sun4-solaris-64int/DBI.pm line 691 via at test.db.pl line 3 -> STORE for DBD::Oracle::db (DBI::db=HASH(0x1a1590)~INNER 'dbi_connect_closure' CODE(0x19f6f0)) STORE DBI::db=HASH(0x1a1590) 'dbi_connect_closure' => CODE(0x19f6f0) <- STORE= 1 at /usr/perl5/site_perl/5.8.4/sun4-solaris-64int/ DBI.pm line 691 via at test.db.pl line 3 >> disconnect DISPATCH (DBI::db=HASH(0xd5ae4) rc1/1 @1 g0 imac01 pid#28069) at test.db.pl line 8 -> disconnect for DBD::Oracle::db (DBI::db=HASH(0xd5ae4)~0x1a1590) OCISessionEnd(24433c,2443b0,24d630,0)=SUCCESS OCIServerDetach(24493c,2443b0,0)=SUCCESS <- disconnect= 1 at test.db.pl line 8 Done. :) >> DESTROY DISPATCH (DBI::db=HASH(0xd5ae4) rc1/1 @1 g0 ima4 pid#28069) <> DESTROY(DBI::db=HASH(0xd5ae4)) ignored for outer handle (inner DBI::db=HASH(0x1a1590) has ref cnt 1) >> DESTROY DISPATCH (DBI::db=HASH(0x1a1590) rc1/1 @1 g0 ima4 pid#28069) -> DESTROY for DBD::Oracle::db (DBI::db=HASH(0x1a1590)~INNER) OCIHandleFree(24d630,OCI_HTYPE_SESSION)=SUCCESS OCIHandleFree(24493c,OCI_HTYPE_SERVER)=SUCCESS OCIHandleFree(24433c,OCI_HTYPE_SVCCTX)=SUCCESS OCIHandleFree(2443b0,OCI_HTYPE_ERROR)=SUCCESS <- DESTROY= undef DESTROY (dbih_clearcom) (dbh 0x1a1590, com 0x1a1b30, imp DBD::Oracle::db): FLAGS 0x102311: COMSET Warn PrintError PrintWarn ShowErrorStatement AutoCommit PARENT DBI::dr=HASH(0xd5b14) KIDS 0 (0 Active) IMP_DATA undef dbih_clearcom 0x1a1590 (com 0x1a1b30, type 2) done. Out of memory! Callback called exit. END failed--call queue aborted. -- DBI::END >> disconnect_all DISPATCH (DBI::dr=HASH(0x1188f8) rc1/3 @1 g0 ima801 pid#28069) at /usr/perl5/site_perl/5.8.4/sun4-solaris-64int/ DBI.pm line 700 via at test.db.pl line 0 -> disconnect_all for DBD::Oracle::dr (DBI::dr=HASH(0x1188f8)~0xd5b14) <- disconnect_all= (not implemented) at /usr/perl5/site_perl/5.8.4/ sun4-solaris-64int/DBI.pm line 700 via at test.db.pl line 0 ! >> DESTROY DISPATCH (DBI::dr=HASH(0x1188f8) rc1/1 @1 g0 ima4 pid#28069) during global destruction ! <> DESTROY(DBI::dr=HASH(0x1188f8)) ignored for outer handle (inner DBI::dr=HASH(0xd5b14) has ref cnt 1) ! >> DESTROY DISPATCH (DBI::dr=HASH(0xd5b14) rc1/1 @1 g0 ima4 pid#28069) during global destruction ! -> DESTROY in DBD::_::common for DBD::Oracle::dr (DBI::dr=HASH(0xd5b14)~INNER) ! <- DESTROY= undef during global destruction DESTROY (dbih_clearcom) (drh 0xd5b14, com 0x3d3c0, imp global destruction): FLAGS 0x102215: COMSET Active Warn PrintWarn ShowErrorStatement AutoCommit PARENT undef KIDS 0 (0 Active) IMP_DATA undef dbih_clearcom 0xd5b14 (com 0x3d3c0, type 1) done.