while ($newline = <HANDLE>) {}