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

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

Сообщение 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
Ответить

Быстрый ответ

Изменение регистра текста: 
Смайлики
:) :( :oops: :roll: :wink: :muza: :clever: :sorry: :angel: :read: *x)
Ещё смайлики…
   
К этому ответу прикреплено по крайней мере одно вложение.

Если вы не хотите добавлять вложения, оставьте поля пустыми.

Максимально разрешённый размер вложения: 15 МБ.

Вернуться в «Linux»