Perl in a Nutshell

Perl in a NutshellSearch this book
Previous: Reference: endserventChapter 5
Function Reference
Next: Reference: eval
 

eof

eof filehandle
eof()

Returns true if the next read on filehandle will return end-of-file, or if filehandle is not open. filehandle may be an expression whose value gives the real filehandle name. An eof without an argument returns the end-of-file status for the last file read. Empty parentheses () may be used in connection with the combined files listed on the command line. That is, inside a while (<>) loop, eof() will detect the end of only the last of a group of files. Use eof(ARGV) or eof (without the parentheses) to test each file in a while (<>) loop. For example, the following code inserts dashes just before the last line of the last file:

while (<>) {
    if (eof()) {
        print "-" x 30, "\n";
    }
    print;
}


Previous: Reference: endserventPerl in a NutshellNext: Reference: eval
Reference: endserventBook IndexReference: eval