note
BrowserUk
<blockquote><i>which does open( PUTFILE, ">$outfile" ) or threads->exit;. The threads->exit is clearly getting called, leaving the socket open. </i></blockquote>
<p>FWIW: I have written a crap load of threaded perl code and never had occasion to use <c>thread->exit;</c>. It is IMO redundant and dangerous.
<P>I would code that line as simply:<code>
open( PUTFILE, ">$outfile" ) or return;
</code>
<p>That way, all the normal perl cleanup will take place before the thread function returns and the thread terminates.
<p>Try it, it just might sort out a lot of your problems!
<div class="pmsig"><div class="pmsig-171588">
<hr />
<font size=1 >
<div>With the rise and rise of 'Social' network sites: 'Computers are making people easier to use everyday'</div>
<div>Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.</div>
<div>"Science is about questioning the status quo. Questioning authority". </div>
<div>In the absence of evidence, opinion is indistinguishable from prejudice.
<p align=right> [http://thebottomline.cpaaustralia.com.au/|RIP Neil Armstrong]</p></div>
</font>
</div></div>
990358
991086