while (my $line = <FILE_FD>) { # just read a line at a time