Skip Menu |

This queue is for tickets about the Want CPAN distribution.

Report information
The Basics
Id: 28224
Status: resolved
Priority: 0/
Queue: Want
People
Owner: robin [...] cpan.org
Requestors: hooo [...] cpan.org
Cc:
AdminCc:
Bug Information
Severity: Critical
Broken in: 0.14
Fixed in: (no value)

History Show all quoted text
  Sun Jul 15 06:12:27 2007 hooo [...] cpan.org - Ticket created
Subject: memory leak
There is a memory leak, the following code snip descripes the problem. use strict; use warnings; use Want; sub foo : lvalue { my $x; $x = Want::want('ASSIGN'); $x } foo = 1 foreach 1..1_000_000; __END__
  Sun Jul 15 06:19:32 2007 hooo [...] cpan.org - Severity Important changed to Critical
  Sun Jul 15 06:45:48 2007 hooo [...] cpan.org - Correspondence added
On So. 15. Jul. 2007, 06:12:27, HOOO wrote: Show quoted text
> There is a memory leak, the following code snip descripes the problem. > > use strict; > use warnings; > use Want; > > sub foo : lvalue { my $x; $x = Want::want('ASSIGN'); $x } > > foo = 1 foreach 1..1_000_000; > > __END__
a save solution is to use a tied variable use strict; use warnings; use Tie::Scalar; our $x; tie $x, 'Tie::StdScalar'; sub foo : lvalue { $x } foo = 1 foreach 1..10_000_000; __END__
  Sun Jul 15 06:45:52 2007 hooo [...] cpan.org - Status changed from 'new' to 'open'
  Sun Jul 15 12:46:32 2007 robin [...] cpan.org - Correspondence added
This will be fixed in the next release. Robin
  Sun Jul 15 12:46:35 2007 robin [...] cpan.org - Status changed from 'open' to 'resolved'
  Sun Jul 15 12:46:36 2007 robin [...] cpan.org - Given to ROBIN