我正在使用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;
}
虽然除非你对其他每一行做一些事情,但效率非常低.