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
}