[mar]

а нельзя ли тоже самое, но гораздо проще?

PHP код:

#!/usr/bin/perl

open(testFile, "file.txt") || die;

while ($line = <testFile>)
{
  print $line ;        
}

close ( testFile ); 

При этом все три строки выводятся (хотя последняя, естественно, без признака конца строки

[Jonik-Mnimonik]

Мне необходимо сделать в той структуре которую я указал.

[mar]

да, я не подумала про tail. Но там как раз ожидается строка, т.е. полностью, с символом завершения (да и в логах, для которого это используется, признак конца строки всегда есть). так что не уверена, что в таком виде это решаемо

[dmitryst]

а просто "tail -f имя_файла" не подходит?

[mar]

кстати, да - обычный tail берет и последнюю строку из этого примера

[Jonik-Mnimonik]

Я описал только небольшой пример, отображающий суть проблемы. на самом деле мне необходимо чтобы этот скрипт работал постоянно и делал действия если пришла строка, а если строки нет необходимо делать другие действия.
Я рассматривал различные варианты решения своей задачи, и этот способ оказался для меня наиболее приемлимый.
Может можно изменить сму функцию fail::tail? Там где держиться строка более 1 секунды принудительно вставлять \n и выталкивать строку. Только вот я никак не могу найти где это можно исправить.
Почему-то не могу загрузить сам файл вот ссылка:

http://cpansearch.perl.org/src/MGRAB...0.99.3/Tail.pm

[mar]

Jonik-Mnimonik,
кстати, у Вас там третья строка появляется, когда приходит очередная партия. Можно раз в 1 с по крону добавлять в файл служебную строку (полноценную). Она будет "выталкивать" задержавшиеся строки, а саму ее легко будет игнорировать

[z01]

кстати, у Вас там третья строка появляется, когда приходит очередная партия. Можно раз в 1 с по крону добавлять в файл служебную строку (полноценную). Она будет "выталкивать" задержавшиеся строки, а саму ее легко будет игнорировать »

Костыль, а если строка будет дольше чем 1 секунда?

Проще задать максимальную строку, и если конец строки не встретился через N символов добавлять символ конца строки.