in reply to Re^2: While problem
in thread While problem

Then you are not running the script that you posted. Please make sure that the code you post and the code you run are the same.

In Section Seekers of Perl Wisdom