Beefy Boxes and Bandwidth Generously Provided by pair Networks
good chemistry is complicated,
and a little bit messy -LW
 
PerlMonks  

Re: Shared array memory leak in Perl5.8

by petesmiley (Friar)
on May 20, 2003 at 15:50 UTC ( #259498=note: print w/replies, xml ) Need Help??


in reply to Shared array memory leak in Perl5.8

I haven't checked the links provided here yet for lack of time. I have run into this in the past. The error I was having was with pop and shift not releasing the memory on shared arrays.

For a quick fix I changed the dequeue method in Thread::Queue to do a: delete $q->[-1] (which returns the value deleted) instead of a shift. I also changed the enqueue to unshift instead of push to return it the correct behavior of a queue. This seems to work.

Not sure if this will help, or what the internal differences between a delete and shift would be to a shared array. Good Luck.

smiles

Edited: Ah there certainly is a patch, I could of used that few months ago. :(

Replies are listed 'Best First'.
Re: Re: Shared array memory leak in Perl5.8
by sureshr (Beadle) on Jun 03, 2003 at 08:23 UTC
    Pete & Joost,

    The patch did'nt really help. I have updated the bug in the bug link http://bugs6.perl.org/rt2/Ticket/Display.html>, bug id 15893, with a sample code that would reproduce the problem. I tried even using delete/unshift technique, which did'nt help either :(
    Currently, I am using a fixed size circular-Q, which would recycle a __MAX__ size array by overwriting the data that is read. Sometimes we would loose old-data due to overwriting, in which case I should choose a better Q size. Sounds not so good, but better than a memory leak :). I shall post more details if I find any update on this.

    Thank you,
    Suresh R

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://259498]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others rifling through the Monastery: (6)
As of 2020-04-09 10:50 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    The most amusing oxymoron is:
















    Results (47 votes). Check out past polls.

    Notices?