Perl-eof
提供:Dev Guides
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
}