while($line = <FILEHANDLE>) {
 ...
}