I don't know perl, is there a free command?  Did you allocate $image?
free($image)

>>> [EMAIL PROTECTED] 5/15/2001 2:56:48 PM >>>
Hmmm,  good try ;)  I'm now undeffing $image after each iteration of the loop, but the 
Gimp still happily chews up my memory.  Then quits with

** Warning **: cache: unable to find room for a tile


On Tue, May 15, 2001 at 02:23:24PM -0700, Rob Hudson wrote:
> Try undef $var;
> 
> There is a delete, but it's to delete a key out of a hash.
> 
> -Rob
> 
> > On 20010515.1427, Cory Petkovsek said ...
> >
> > I'm having trouble running out of memory with this perl script.
> > Actually, I'm able to run out of memory, but that's the problem!  
> > 
> > It's running on 16500 images, opening one in gimp (in the
> > background), checking the size, then moving on to the next.  I was
> > unable to find a function in perl to delete a referenced variable
> > (delete $img), or a function in PDB (perl-gimp database
> > Gimp->gimp_close($img)) to close an image, or deallocate the memory.  
> > 
> > The script gets through about 350-500 images before saying something
> > about it can't create tiles.  However, I'm watching a memory meter,
> > as it drops down.
> > 
> > Any suggestions please!?  
> > 
> > Thanks,
> > Cory

Reply via email to