while (<HANDLE>) { ... } # same as ...
while (defined($_ = <HANDLE>)) { ... }