in reply to debug the error!!

Please: put your code into <CODE> tags. I really can't read what you put here. (See the Site HowTo.)

In Section Seekers of Perl Wisdom