short filehandle question

[Ela Jarecka]

Hi,
Executing my program with -w option I get the following warning:
'Value of <HANDLE> construct can be "0"; test with defined() at readData
line 65535.'

Surely I do not have 65535 lines in my program, but I suspect this one:

#reading data
open (FILEH, $filename) or die "Can't open file!\n";

while ($line = <FILEH>) {
....

How should I rewrite it to avoid that warning?

Thanks in advance,
Ela