in reply to Massive Memory Leak

That looks like every iteration you're preparing a query.
Perhaps pre-declaring it and using placeholders will help?

In Section Seekers of Perl Wisdom