while (my $line_holder = ) { foreach etc... #### while (! eof(FILE)) { my $line_holder = ; foreach etc...