Beefy Boxes and Bandwidth Generously Provided by pair Networks
Clear questions and runnable code
get the best and fastest answer
 
PerlMonks  

Re: How do I tail -f a file if it is NFS mounted?

by targetsmart (Curate)
on Jan 23, 2009 at 14:54 UTC ( [id://738494]=note: print w/replies, xml ) Need Help??


in reply to How do I tail -f a file if it is NFS mounted?

'perldoc -q tail' might help you, if no perldoc installed here is from perlfaq5
How do I do a "tail -f" in perl? First try seek(GWFILE, 0, 1); The statement "seek(GWFILE, 0, 1)" doesn't change the current p +osition, but it does clear the end-of- file condition on the handle, so that the next <GWFILE> makes P +erl try again to read something. If that doesn't work (it relies on features of your stdio imple +mentation), then you need something more like this: for (;;) { for ($curpos = tell(GWFILE); <GWFILE>; $curpos = tell +(GWFILE)) { # search for some stuff and put it into files } # sleep for a while seek(GWFILE, $curpos, 0); # seek to where we had bee +n } If this still doesn't work, look into the POSIX module. POSIX +defines the clearerr() method, which can remove the end of file condition on a filehandle. The meth +od: read until end of file, clearerr(), read some more. Lather, rinse, repeat. There's also a File::Tail module from CPAN.

but the data transfer over NFS will not be live, there would be minimal delay if you expect live data.

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://738494]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others perusing the Monastery: (7)
As of 2024-03-28 15:12 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found