Ok, then I will have to open a new connection each time I run my code. That's all.

No, that's not all. Why do you think so? By which (lacking) part of my post did you come to that conclusion? Did you give up, were you answered?

I thank you so much for the trouble shmem!

You're welcome. But as for your next words -

"Please help me with doing something; but while I really want to provide details I bet you, yourself, would not want to decode hundreds of lines of code"

- these do not match the point, it's not "all or nothing". Part of my job is skimming hundreds of lines of code and get a clue of what's wrong, and I do so more often than not with code I myself perpetrated. While its not sensible to post such a bunch of lines as a node, your scratchpad will gladly store these and give interested people an opportunity to get you on the way.

_($_=" "x(1<<5)."?\n".q·/)Oo.  G°\        /
                              /\_¯/(q    /
----------------------------  \__(m.====·.(_("always off the crowd"))."·
");sub _{s./.($e="'Itrs `mnsgdq Gdbj O`qkdq")=~y/"-y/#-z/;$e.e && print}

Did you give up, were you answered?
No:) That was my conclusion. Correct me if you are still not sick of me.

I have attached three files to my scratchpad. A batch file which runs the main Perl file iteratively. And a small config file which is to be included inside the Perl file. I am not sure whether they will imply anything to yo, I'd be more than happy to clarify where asked. Roughly: we read a text file word by word, stem them, and record how many times a word exists within an "s"-word-window (span) of every other word. Thanks.