In all your drivel about records, you seem to have forgotten that perl is really really good at handling TEXT. Text doesn't have to finish with \n so it's perfectly acceptable to say "read all the lines in this file and if they have a trailing \n strip it off". chomp($line) is a rather handy way of expressing that. I use it most days, and always without error.