'thats the actual code i just posted few, and striped some because couldnt post whole code'

Impossible, that sql isn't valid. If you spent half as much time and effort actually learning from advice you've been given, rather than cobbling together an abomination of code from various answers, you'd be making life a lot easier for yourself. This is a site for helping people learn perl more than it is for the bored to help the lazy. Again no SSCCE, not reviewing what has been said in your previous threads (on the same subject), no effort to understand the code you're running, no debugging, tutorials->Debugging and Optimization->Basic debugging checklist, huge hint, if you follow that you'd understand where you go wrong.