perl File :: Tail延迟

Question

我正在使用perl File :: Tail库来尾部文件的输出并解析其输出。

一切工作正常，除了启动脚本之后开始输出之前似乎有10秒的延迟。 第一次读取后，它可以正常工作，并且所有输出都是瞬时的。 一旦开始工作，延迟期间的所有写操作似乎就会输出，因此我不会丢失任何数据。 我认为这与我正在读取的文件无关，因为运行常规的“ tail -f”可立即生效。

这是整个脚本：

#!/bin/perl
use File::Tail;

$file=File::Tail->new("file.txt");

while (defined($line=$file->read)) {
    print "$line\n";
}

我从在线某个地方的示例中复制了此内容。 我对perl或File :: Tail不太熟悉，希望我做错了什么。 任何帮助，将不胜感激。

Answer 1

请参阅文档中的interval选项：

在首次检查文件之前，将花费在睡眠上的初始秒数（实数）。 默认值为十秒钟，这意味着“ File :: Tail”将休眠10秒钟，然后确定文件中出现了几行新内容。