On Thu, Mar 06, 2003 at 06:20:07PM +0000, Tim Bunce wrote: : On Wed, Mar 05, 2003 at 08:13:00AM -0600, Philip Molter wrote: : > I have a very long running Perl process. I recently upgraded the : > DBI from 1.32 to 1.33 (and then 1.34) and now, the process is leaking : > memory. Given the complexity of the project, it's not possible to : > reduce it to a simple test case at this time, but it's definitely : > related to the DBI -- if I downgrade to 1.32, the problem goes away. : : Try commenting out line 631: : : $dbh->{dbi_connnect_closure} = $connect_closure if $dbh; : : Please let me know if that helps.
Thanks Tim. I commented out the suggested line and when I ran the tests, I got the output below. I installed and ran anyway since this particular application isn't subclassing the DBI. I'll let you know what the results are. Philip * Philip Molter * Texas.net Internet * http://www.texas.net/ * [EMAIL PROTECTED] make test PERL_DL_NONLAZY=1 /usr/bin/perl -Iblib/arch -Iblib/lib -I/usr/lib/perl5/5.6.1/i386-linux -I/usr/lib/perl5/5.6.1 -e 'use Test::Harness qw(&runtests $verbose); $verbose=0; runtests @ARGV;' t/*.t t/01basics.............ok t/02dbidrv.............ok t/03hleak..............ok t/04mods...............ok t/05thrclone...........skipped all skipped: this perl 5.006001 not configured to support iThreads t/06attrs..............ok t/07kids...............ok t/08keeperr............ok t/10examp..............ok t/15array..............ok t/20meta...............ok t/30subclass...........ok 12/28Use of uninitialized value in numeric ne (!=) at t/30subclass.t line 144. t/30subclass...........ok 14/28Test 0: wanted 'MyDBI::db', got '' t/30subclass...........ok 15/28Use of uninitialized value in concatenation (.) or string at t/30subclass.t line 82. Test 0: wanted '1', got '' Use of uninitialized value in numeric ne (!=) at t/30subclass.t line 150. Use of uninitialized value in numeric ne (!=) at t/30subclass.t line 151. t/30subclass...........ok 16/28Test 0: wanted 'MyDBI::db', got '' Use of uninitialized value in concatenation (.) or string at t/30subclass.t line 82. Test 0: wanted '1', got '' t/30subclass...........FAILED tests 18-19, 22-23 Failed 4/28 tests, 85.71% okay t/40profile............ok t/41prof_dump..........ok t/42prof_data..........ok t/60preparse...........ok t/80proxy..............skipped all skipped: modules required for proxy are probably not installed t/zz_01basics_pp....... Using DBI::PurePerl (DBI_PUREPERL=2) t/zz_01basics_pp.......ok t/zz_02dbidrv_pp.......ok t/zz_03hleak_pp........ok t/zz_04mods_pp.........ok t/zz_05thrclone_pp.....skipped all skipped: this perl 5.006001 not configured to support iThreads t/zz_06attrs_pp........ok t/zz_07kids_pp.........skipped all skipped: $h->{Kids} attribute not supported for DBI::PurePerl t/zz_08keeperr_pp......ok t/zz_10examp_pp........ok 31/245 Taint mode switching tests skipped t/zz_10examp_pp........ok 48/245 Taint attribute tests skipped t/zz_10examp_pp........ok t/zz_15array_pp........ok t/zz_20meta_pp.........ok t/zz_30subclass_pp.....ok 8/28Use of uninitialized value in numeric ne (!=) at t/30subclass.t line 144. t/zz_30subclass_pp.....ok 9/28Test 0: wanted 'MyDBI::db', got '' Use of uninitialized value in concatenation (.) or string at t/30subclass.t line 82. Test 0: wanted '1', got '' t/zz_30subclass_pp.....ok 10/28Use of uninitialized value in numeric ne (!=) at t/30subclass.t line 150. Use of uninitialized value in numeric ne (!=) at t/30subclass.t line 151. Test 0: wanted 'MyDBI::db', got '' Use of uninitialized value in concatenation (.) or string at t/30subclass.t line 82. t/zz_30subclass_pp.....ok 11/28Test 0: wanted '1', got '' t/zz_30subclass_pp.....FAILED tests 18-19, 22-23 Failed 4/28 tests, 85.71% okay t/zz_40profile_pp......skipped all skipped: profiling not supported for DBI::PurePerl t/zz_41prof_dump_pp....skipped all skipped: profiling not supported for DBI::PurePerl t/zz_42prof_data_pp....skipped all skipped: profiling not supported for DBI::PurePerl t/zz_60preparse_pp.....skipped all skipped: preparse not supported for DBI::PurePerl t/zz_80proxy_pp........skipped all skipped: modules required for proxy are probably not installed Failed Test Stat Wstat Total Fail Failed List of Failed ------------------------------------------------------------------------------- t/30subclass.t 28 4 14.29% 18-19 22-23 t/zz_30subclass_pp.t 28 4 14.29% 18-19 22-23 9 tests skipped. Failed 2/34 test scripts, 94.12% okay. 8/1152 subtests failed, 99.31% okay. make: *** [test_dynamic] Error 11