Написал программу читающую этот файл. Она читает этот файл без проблем.
use 5.12.0;use warnings;
use Fcntl qw(:flock);
open(FH, '<', 'file.txt') or die;
flock(FH, LOCK_EX|LOCK_NB) or die "Cannot lock - $! $^E\n";
while (<FH>) {
print
}
Для того чтобы не работала буферизация при записи я добавил в вашу программу FH->autoflush(1);
Ответ написан
Комментировать
Комментировать
Оценили как «Нравится»
Войдите на сайт
Чтобы задать вопрос и получить на него квалифицированный ответ.