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

Reply via email to