Re^2: global variable initialization inside try{}

I just read this Re: Re2: Learning how to use the Error module by example
where it was told that the below code will leak memory

use Error qw( :try );

sub leaky_function {
    my $foo = 7;
    try {
        # do something here
        try {
            $foo++;
        } catch Error::Simple with {
            # whatever
        };
    } catch Error::Simple with {
        # whatever
    };
}
[download]

please explain me how it leaks memory when I call it every time.

Vivek
-- In accordance with the prarabdha of each, the One whose function it is to ordain makes each to act. What will not happen will never happen, whatever effort one may put forth. And what will happen will not fail to happen, however much one may seek to prevent it. This is certain. The part of wisdom therefore is to stay quiet.

Comment on Re^2: global variable initialization inside try{} Download Code

Replies are listed 'Best First'.
Re^3: global variable initialization inside try{} by perrin (Chancellor) on Apr 10, 2009 at 13:17 UTC
In the bottom of that post it says that this leak was fixed in recent versions of perl. It used to leak by creating copies of $foo. If you're on a version prior to 5.8, you should still be concerned about it. The other problems with the try{} syntax still exist.	[reply]