printing lines of a changing document

Anonymous Monk has asked for the wisdom of the Perl Monks concerning the following question:

Replies are listed 'Best First'.
Re: printing lines of a changing document by chromatic (Archbishop) on Sep 07, 2001 at 04:36 UTC
This is answered in perlfaq5, specifically How do I do a tail -f in perl?. The seek-based solution there may work better than the filehandle read, depending on if the external program adds line endings. The requisite module is probably File::Tail. Update: Fixed the link, thanks to Albannach.	[reply]
Re: printing lines of a changing document by gellor (Novice) on Sep 07, 2001 at 01:17 UTC
The Perl Cookbook covers the problem of watching a constantly growing file. Their suggested solution is along the lines of: (re-constructed from memory and some of my scripts) `open (FH, "filename") or die "Unable to open file: $!"; $DELAY = 5; for(;;) { while(<FH>) { #do stuff here } sleep $DELAY seek(FH, 0, 1); }` [download] The PCB also mentions that IO::Handle but I don't have an example of that quickly availible. I'll leave the display portion for you or another monk as I don't have any TK experience. Update: Added the seek line that should have always been there...not sure how I missed it in preview.	[reply] [d/l]