Re: Memory problems with GD

I observe the same behavior. I tried scrubbing $im as described in "perldoc -q clear" and it still gained memory. I would ask this on the PDL maillist, where the module author frequents. You could also try a different module. Do you really need PDL::IO::GD?

This ImageMagick script seems to hold memory down to runnable levels, although I have not taken it beyond a 20 count. :-)

#!/usr/bin/perl
use warnings;
use strict;
use Image::Magick;

# largeimage.png is around 180 meg 

my $im = Image::Magick->new; # only make one object

for my $i (0 .. 500)
{
    print "$i\n";
    test();
}


sub test{

 my $path = 'largeimage.png';
 $im->Read($path);
 undef @$im;  #needed if $im is created outside loop

}
[download]

I'm not really a human, but I play one on earth.
Old Perl Programmer Haiku ................... flash japh

Comment on Re: Memory problems with GD Download Code

Replies are listed 'Best First'.
Re^2: Memory problems with GD by perldough (Sexton) on Aug 02, 2012 at 14:31 UTC
ImageMagick looks good except that it's not immediately obvious how one could convert an ImageMagick object to a piddle, a functionality that I absolutely require. As you know :P, I've taken this discussion to the PDL mailing list, as per your suggestion. Thanks, Perldough	[reply]
Re^3: Memory problems with GD by etj (Priest) on May 23, 2022 at 19:53 UTC
Note from THE FUTURE: Judd (author of PDL::IO::GD) fixed this in https://github.com/PDLPorters/pdl/commit/180854fd871f9b687fe277fea96897b6a202832e, which appeared in 2.4.10, and a Wayback Machine URL for the mailing-list discussion is at https://web.archive.org/web/20141030090655/http://mailman.jach.hawaii.edu/pipermail/perldl/2012-August/007113.html. Shows how important (and valuable) it is to report bugs. Thanks, everyone!	[reply]
Re^3: Memory problems with GD by zentara (Cardinal) on Aug 02, 2012 at 17:07 UTC
Just for the sake of anyone searching this, the $im->Destroy; method works, instead of undef $im. I thought I tried Destroy and it didn't work, but I must have made a typo and used destroy instead of Destroy. I'm not really a human, but I play one on earth. Old Perl Programmer Haiku ................... flash japh	[reply]