Beefy Boxes and Bandwidth Generously Provided by pair Networks
No such thing as a small change
 
PerlMonks  

Re^4: Watch log for string (tail -f)

by bimleshsharma (Beadle)
on Oct 12, 2012 at 07:39 UTC ( #998625=note: print w/ replies, xml ) Need Help??


in reply to Re^3: Watch log for string (tail -f)
in thread Watch log for string (tail -f)

Try this, May this will help

use File::Tail; sub reading_updated_file { my $path=shift; my $count=0; my $file=File::Tail->new($path); while(defined (my $read=$file->read)) { if($read =~ /string_to_match/) { $count++; last if $count ==3; } print "here doing rest statements"; } } &reading_updated_file("path of file_to tail");


Comment on Re^4: Watch log for string (tail -f)
Download Code

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others avoiding work at the Monastery: (8)
As of 2014-12-26 05:56 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    Is guessing a good strategy for surviving in the IT business?





    Results (165 votes), past polls