That was what I was meaning, I changed nothing it worked as written. As to strange things. What platform are you on. Does the file have EOF and EOL markers in it?? What version of perl do you have .. Have you tried using perldb?
--

Zigster