Получение Perl File::Tail для начала потоковой передачи файла ближе к концу ⇐ Linux

[Anonymous]

Я использую приведенный ниже код для непрерывного чтения из файла. Проблема, с которой я сталкиваюсь, заключается в том, что всякий раз, когда я запускаю код, он начинается с начала файла, возвращая весь файл, а не с последних 50 строк.
Я проконсультировался с документации и попробовал разные значения аргумента Tail=>n - даже n=total строк в файле минус 50 - однако мой код каждый раз начинается в начале файла, а не в конце, как мне нужно. Что я делаю не так?
use strict;
use warnings;
use File::Tail;
my $name; #file name

my $name="/home/richard/double-take/messages.log";
my $line;
my $file=File::Tail->new(name=>$name, interval=>3, maxinterval=>3, tail=>50);

while (defined($line=$file->read)) {

print "$line";
}


Подробнее здесь: https://stackoverflow.com/questions/783 ... ds-the-end