Each filehandle in Perl counts the number of lines that have been read from it. (Depending on the value of $/, Perl's idea of what constitutes a line may not match yours.) </quote>

Update: nevermind me, I'm an idiot. $. won't help in this case.
/me wanders off...