Skip Menu |

This queue is for tickets about the DBD-AnyData CPAN distribution.

Report information
The Basics
Id: 11908
Status: resolved
Priority: 0/
Queue: DBD-AnyData

People
Owner: Nobody in particular
Requestors: xantus+cpan [...] xantus.org
Cc: cjm [...] cpan.org
AdminCc:

Bug Information
Severity: Normal
Broken in: 0.08
Fixed in: (no value)



Subject: DBI handle 0x8575e50 cleared whilst still active at ....
Hey Jeff, Here's the errors I'm getting when I make test Running make test PERL_DL_NONLAZY=1 /usr/bin/perl "-Iblib/lib" "-Iblib/arch" test.pl DBD::AnyData CSV ... DBI handle 0x8575e50 cleared whilst still active at test.pl line 73. dbih_clearcom (sth 0x8575e50, com 0x857af78, imp DBD::AnyData::st): FLAGS 0x182115: COMSET Active Warn PrintError PrintWarn ShowErrorStatement PARENT DBI::db=HASH(0x85741c4) KIDS 0 (0 Active) IMP_DATA undef NUM_OF_FIELDS 3 NUM_OF_PARAMS 0 DBI handle 0x860e974 cleared whilst still active at /usr/local/lib/perl/5.8.4/DBI.pm line 1548. dbih_clearcom (sth 0x860e974, com 0x8612538, imp DBD::AnyData::st): FLAGS 0x182115: COMSET Active Warn PrintError PrintWarn ShowErrorStatement PARENT DBI::db=HASH(0x85741c4) KIDS 0 (0 Active) IMP_DATA undef NUM_OF_FIELDS 1 NUM_OF_PARAMS 0 DBI handle 0x857d8b4 cleared whilst still active at test.pl line 90. dbih_clearcom (sth 0x857d8b4, com 0x8612538, imp DBD::AnyData::st): FLAGS 0x182115: COMSET Active Warn PrintError PrintWarn ShowErrorStatement PARENT DBI::db=HASH(0x85741c4) KIDS 0 (0 Active) IMP_DATA undef NUM_OF_FIELDS 1 NUM_OF_PARAMS 1 DBI handle 0x83dba98 cleared whilst still active at test.pl line 39. dbih_clearcom (sth 0x83dba98, com 0x861f988, imp DBD::AnyData::st): FLAGS 0x182115: COMSET Active Warn PrintError PrintWarn ShowErrorStatement PARENT DBI::db=HASH(0x85741c4) KIDS 0 (0 Active) IMP_DATA undef NUM_OF_FIELDS 3 NUM_OF_PARAMS 0 ok! Pipe ... DBI handle 0x860e8b4 cleared whilst still active at test.pl line 73. dbih_clearcom (sth 0x860e8b4, com 0x861fa68, imp DBD::AnyData::st): FLAGS 0x182115: COMSET Active Warn PrintError PrintWarn ShowErrorStatement PARENT DBI::db=HASH(0x834104c) KIDS 0 (0 Active) IMP_DATA undef NUM_OF_FIELDS 3 NUM_OF_PARAMS 0 DBI handle 0x860c48c cleared whilst still active at /usr/local/lib/perl/5.8.4/DBI.pm line 1548. dbih_clearcom (sth 0x860c48c, com 0x861fa68, imp DBD::AnyData::st): FLAGS 0x182115: COMSET Active Warn PrintError PrintWarn ShowErrorStatement PARENT DBI::db=HASH(0x834104c) KIDS 0 (0 Active) IMP_DATA undef NUM_OF_FIELDS 1 NUM_OF_PARAMS 0 DBI handle 0x861ed5c cleared whilst still active at test.pl line 90. dbih_clearcom (sth 0x861ed5c, com 0x861fa68, imp DBD::AnyData::st): FLAGS 0x182115: COMSET Active Warn PrintError PrintWarn ShowErrorStatement PARENT DBI::db=HASH(0x834104c) KIDS 0 (0 Active) IMP_DATA undef NUM_OF_FIELDS 1 NUM_OF_PARAMS 1 DBI handle 0x860c558 cleared whilst still active at test.pl line 39. dbih_clearcom (sth 0x860c558, com 0x86346f8, imp DBD::AnyData::st): FLAGS 0x182115: COMSET Active Warn PrintError PrintWarn ShowErrorStatement PARENT DBI::db=HASH(0x834104c) KIDS 0 (0 Active) IMP_DATA undef NUM_OF_FIELDS 3 NUM_OF_PARAMS 0 ok! Tab ... DBI handle 0x861ed2c cleared whilst still active at test.pl line 73. dbih_clearcom (sth 0x861ed2c, com 0x857cef8, imp DBD::AnyData::st): FLAGS 0x182115: COMSET Active Warn PrintError PrintWarn ShowErrorStatement PARENT DBI::db=HASH(0x857417c) KIDS 0 (0 Active) IMP_DATA undef NUM_OF_FIELDS 3 NUM_OF_PARAMS 0 DBI handle 0x8340fd4 cleared whilst still active at /usr/local/lib/perl/5.8.4/DBI.pm line 1548. dbih_clearcom (sth 0x8340fd4, com 0x8634970, imp DBD::AnyData::st): FLAGS 0x182115: COMSET Active Warn PrintError PrintWarn ShowErrorStatement PARENT DBI::db=HASH(0x857417c) KIDS 0 (0 Active) IMP_DATA undef NUM_OF_FIELDS 1 NUM_OF_PARAMS 0 DBI handle 0x860c564 cleared whilst still active at test.pl line 90. dbih_clearcom (sth 0x860c564, com 0x8634970, imp DBD::AnyData::st): FLAGS 0x182115: COMSET Active Warn PrintError PrintWarn ShowErrorStatement PARENT DBI::db=HASH(0x857417c) KIDS 0 (0 Active) IMP_DATA undef NUM_OF_FIELDS 1 NUM_OF_PARAMS 1 DBI handle 0x860e7a0 cleared whilst still active at test.pl line 39. dbih_clearcom (sth 0x860e7a0, com 0x86382a8, imp DBD::AnyData::st): FLAGS 0x182115: COMSET Active Warn PrintError PrintWarn ShowErrorStatement PARENT DBI::db=HASH(0x857417c) KIDS 0 (0 Active) IMP_DATA undef NUM_OF_FIELDS 3 NUM_OF_PARAMS 0 ok! Fixed ... DBI handle 0x824ab58 cleared whilst still active at test.pl line 73. dbih_clearcom (sth 0x824ab58, com 0x8637068, imp DBD::AnyData::st): FLAGS 0x182115: COMSET Active Warn PrintError PrintWarn ShowErrorStatement PARENT DBI::db=HASH(0x8341094) KIDS 0 (0 Active) IMP_DATA undef NUM_OF_FIELDS 3 NUM_OF_PARAMS 0 DBI handle 0x8340fbc cleared whilst still active at /usr/local/lib/perl/5.8.4/DBI.pm line 1548. dbih_clearcom (sth 0x8340fbc, com 0x8634bc0, imp DBD::AnyData::st): FLAGS 0x182115: COMSET Active Warn PrintError PrintWarn ShowErrorStatement PARENT DBI::db=HASH(0x8341094) KIDS 0 (0 Active) IMP_DATA undef NUM_OF_FIELDS 1 NUM_OF_PARAMS 0 DBI handle 0x8636c28 cleared whilst still active at test.pl line 90. dbih_clearcom (sth 0x8636c28, com 0x8634bc0, imp DBD::AnyData::st): FLAGS 0x182115: COMSET Active Warn PrintError PrintWarn ShowErrorStatement PARENT DBI::db=HASH(0x8341094) KIDS 0 (0 Active) IMP_DATA undef NUM_OF_FIELDS 1 NUM_OF_PARAMS 1 DBI handle 0x860c42c cleared whilst still active at test.pl line 39. dbih_clearcom (sth 0x860c42c, com 0x863a608, imp DBD::AnyData::st): FLAGS 0x182115: COMSET Active Warn PrintError PrintWarn ShowErrorStatement PARENT DBI::db=HASH(0x8341094) KIDS 0 (0 Active) IMP_DATA undef NUM_OF_FIELDS 3 NUM_OF_PARAMS 0 ok! Paragraph ... DBI handle 0x861ed44 cleared whilst still active at test.pl line 73. dbih_clearcom (sth 0x861ed44, com 0x86382a8, imp DBD::AnyData::st): FLAGS 0x182115: COMSET Active Warn PrintError PrintWarn ShowErrorStatement PARENT DBI::db=HASH(0x820dd50) KIDS 0 (0 Active) IMP_DATA undef NUM_OF_FIELDS 3 NUM_OF_PARAMS 0 DBI handle 0x8340fa4 cleared whilst still active at /usr/local/lib/perl/5.8.4/DBI.pm line 1548. dbih_clearcom (sth 0x8340fa4, com 0x86382a8, imp DBD::AnyData::st): FLAGS 0x182115: COMSET Active Warn PrintError PrintWarn ShowErrorStatement PARENT DBI::db=HASH(0x820dd50) KIDS 0 (0 Active) IMP_DATA undef NUM_OF_FIELDS 1 NUM_OF_PARAMS 0 DBI handle 0x8641710 cleared whilst still active at test.pl line 90. dbih_clearcom (sth 0x8641710, com 0x86382a8, imp DBD::AnyData::st): FLAGS 0x182115: COMSET Active Warn PrintError PrintWarn ShowErrorStatement PARENT DBI::db=HASH(0x820dd50) KIDS 0 (0 Active) IMP_DATA undef NUM_OF_FIELDS 1 NUM_OF_PARAMS 1 DBI handle 0x8633108 cleared whilst still active at test.pl line 39. dbih_clearcom (sth 0x8633108, com 0x863e110, imp DBD::AnyData::st): FLAGS 0x182115: COMSET Active Warn PrintError PrintWarn ShowErrorStatement PARENT DBI::db=HASH(0x820dd50) KIDS 0 (0 Active) IMP_DATA undef NUM_OF_FIELDS 3 NUM_OF_PARAMS 0 ok! ARRAY ... DBI handle 0x861480c cleared whilst still active at /usr/local/lib/perl/5.8.4/DBI.pm line 1548. dbih_clearcom (sth 0x861480c, com 0x86396a0, imp DBD::AnyData::st): FLAGS 0x182115: COMSET Active Warn PrintError PrintWarn ShowErrorStatement PARENT DBI::db=HASH(0x8574338) KIDS 0 (0 Active) IMP_DATA undef NUM_OF_FIELDS 1 NUM_OF_PARAMS 0 DBI handle 0x85741c4 cleared whilst still active at test.pl line 90. dbih_clearcom (sth 0x85741c4, com 0x86396a0, imp DBD::AnyData::st): FLAGS 0x182115: COMSET Active Warn PrintError PrintWarn ShowErrorStatement PARENT DBI::db=HASH(0x8574338) KIDS 0 (0 Active) IMP_DATA undef NUM_OF_FIELDS 1 NUM_OF_PARAMS 1 DBI handle 0x861ed80 cleared whilst still active at test.pl line 39. dbih_clearcom (sth 0x861ed80, com 0x863e740, imp DBD::AnyData::st): FLAGS 0x182115: COMSET Active Warn PrintError PrintWarn ShowErrorStatement PARENT DBI::db=HASH(0x8574338) KIDS 0 (0 Active) IMP_DATA undef NUM_OF_FIELDS 3 NUM_OF_PARAMS 0 ok! /usr/bin/make test -- OK Running make install Writing /usr/local/lib/perl/5.8.4/auto/DBD/AnyData/.packlist Appending installation info to /usr/local/lib/perl/5.8.4/perllocal.pod /usr/bin/make install -- OK # perl -v This is perl, v5.8.4 built for i386-linux-thread-multi ....
RT-Send-CC: jeff [...] vpservices.com
I ran into this same problem, and took a few minutes to investigate. The problem appears to be that DBD::AnyData::st defines DESTROY and finish methods that do nothing, when it should have just used the ones it inherited from DBD::File::st (which will take care of marking the statement handle inactive). Deleting those two subs seems to make everything work. I've attached a patch.
--- DBD-AnyData-0.08/AnyData.pm Sun Apr 18 19:24:26 2004 +++ DBD-AnyData-CJM/AnyData.pm Fri Jul 28 14:48:37 2006 @@ -494,10 +494,6 @@ $DBD::AnyData::st::imp_data_size = 0; @DBD::AnyData::st::ISA = qw(DBD::File::st); -sub DESTROY ($) { undef; } - -sub finish ($) {} - package DBD::AnyData::Statement; #@DBD::AnyData::Statement::ISA = qw(SQL::Statement DBD::File::Statement);
Also resolved in 0.11 by Jens Cheers Sven