Skip Menu |
 

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

Report information
The Basics
Id: 70484
Status: new
Priority: 0/
Queue: DBD-XBase

People
Owner: Nobody in particular
Requestors: serg_56 [...] mail.ru
Cc:
AdminCc:

Bug Information
Severity: (no value)
Broken in: 1.02
Fixed in: (no value)



Subject: Memory Leak in module XBase
Download (untitled) / with headers
text/plain 826b
#Example code use strict; use XBase; my ($pass,$obj); while(1){ $obj=XBase->new("abc.dbf") or die XBase->errstr; $obj->close(); sleep 1; print ++$pass." Ok!\n"; } exit; XBase version 1.02 ActivePerl This is perl 5, version 14, subversion 1 (v5.14.1) built for MSWin32- x86-multi-thread Similar result for other versions ActivePerl - 5.8.9, 5.12.4 OS - WindowsXP SP3 Professional Possibly problem that object XBase contains references to arrays and hashes. I offer the changed method close for class XBase # Close the file (and memo) sub close { my $self = shift; if (defined $self->{'memo'}) { $self->{'memo'}->close(); delete $self->{'memo'}; } $self->SUPER::close(); #The next line is added in an existing method for removal of references from object for(keys %$self){ delete $self->{$_}; } }


This service is sponsored and maintained by Best Practical Solutions and runs on Perl.org infrastructure.

Please report any issues with rt.cpan.org to rt-cpan-admin@bestpractical.com.