I usually avoid posting Perl-free nodes like this one... but in this case, I'd just like to say a quick thanks in reverse.  It's always a pleasure to have self-contained code that I can just cut-n-paste and run. That makes me far more inclined to try to replicate the problem and look for a solution... — Thanks, and good luck with finding the remaining leaks!