Perl 的 eof 函数

描述

如果下一次对 FILEHANDLE 的读取将返回文件结束，或 FILEHANDLE 未打开，那么此函数将返回 1。

不带参数的 eof 使用上次读取的文件。使用带有空括号的 eof() 非常不同。它指的是由命令行上列出的文件形成的伪文件，并通过 <> 运算符访问它。

语法

下面是此函数的简单语法 -

eof FILEHANDLE

eof()

eof

返回值

如果 FILEHANDLE 不在文件结尾处，此函数将返回 undef，如果 FILEHANDLE 在下次读取时报告文件结尾，则返回 1。

示例

下面是显示其基本用法的示例代码 -

# insert dashes just before last line of last file
while (<>) {
   if (eof()) {	# check for end of last file
      print "--------------\n";
   }
   print;
   last if eof();  # needed if we're reading from a terminal
}