История изменений

Исправление krpsh, 13.07.21 15:52 (текущая версия) :

решил сам )

perl -e 'open L, ">", "out.log"; select(L); $| = 1; while(1){open F, "<", "test.fifo"; print while <F>; close F} close L'

ps: поговорил сам с собой )

Исходная версия krpsh, 13.07.21 15:52:

решил сам )

perl -e 'open L, ">", "out.log"; select(L); $| = 1; while(1){open F, "<", "test.fifo"; print while <F>; close F} close L'

ps: поговорил сам с собой )