perl文件::尾部延迟



我使用perl-File::Tail库来跟踪文件的输出并解析其输出。

一切都很好,只是在我启动脚本后,在它开始输出之前,似乎有大约10秒的延迟。第一次读取后,它工作良好,所有输出都是即时的。延迟期间的所有写入似乎都是在它开始工作后输出的,所以我不会丢失任何数据。我不认为这与我正在阅读的文件无关,因为运行一个常规的"tail-f"可以立即工作。

以下是整个脚本:

#!/bin/perl
use File::Tail;
$file=File::Tail->new("file.txt");
while (defined($line=$file->read)) {
    print "$linen";
}

我从网上某个地方的一个例子中复制了这个。我对perl或File::Tail不是很熟悉,我希望我做错了什么。如有任何帮助,我们将不胜感激。

请参阅文档中的interval选项:

在文件被首先检查。默认值为10秒,表示"File::Tail"将休眠10秒,然后确定文件中出现了多少新行。

最新更新