Re: DBI Error: END failed--call queue aborted.

Well nothing in that pops out at me.

You DBD::ORacle is way out of data for you DBI try updating to DBD::Oracle
1.26 ans see what happens

cheers


On Fri, Nov 12, 2010 at 3:49 PM, i5mast <[email protected]> wrote:

> On Nov 12, 8:24 am, [email protected] (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.
>
>
>

--
The best compliment you could give Pythian for our service is a referral.