我正在使用 Perl 编写日志解析脚本。我正在阅读日志文件如下:
open(LOGFILE, "$logFile") || die "Error opening log file $logFile\n";
while(<LOGFILE>)
{
#Processing statements goes here.
}
现在在处理语句中,我想检查文件读取指针是否在最后一行。如果是,那么想在退出之前处理一个条件。
所以问题来自用于逐行读取文件的 while 循环内,我如何确定它是否在最后一行?
最佳答案
my $last;
while(<MYFILE>) {
$last = $_ if eof;
}
尽管除非您对其他每一行都做某事,否则这是非常低效的。
关于perl - 在 perl 的循环中读取文件时,如何确定它是否是最后一行,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/1176516/