I frequently find that blank line(s) at the end of a data file are the root cause of this error. In that case, the only error in the perl code is a failure to anticipate them.