File-SmartTail
view release on metacpan or search on metacpan
=head2 Regular remote file on two hosts
use File::SmartTail;
$file = "/tmp/foo";
$tail = new File::SmartTail;
$tail->WatchFile(-file=>$file, -type=>"UNIX-REMOTE", -host=>"guinness", -rmtopts
=>"-type UNIX");
$tail->WatchFile(-file=>$file, -type=>"UNIX-REMOTE", -host=>"corona", -rmtopts=>
"-type UNIX");
while($line = $tail->GetLine()) {
print $line;
}
=head2 Local file, with timeout
use File::SmartTail;
lib/File/SmartTail.pm view on Meta::CPAN
=head2 Regular remote file on two hosts
use File::SmartTail;
$file = "/tmp/foo";
$tail = new File::SmartTail;
$tail->WatchFile(-file=>$file, -type=>"UNIX-REMOTE", -host=>"guinness", -rmtopts
=>"-type UNIX");
$tail->WatchFile(-file=>$file, -type=>"UNIX-REMOTE", -host=>"corona", -rmtopts=>
"-type UNIX");
while($line = $tail->GetLine()) {
print $line;
}
=head2 Local file, with timeout
use File::SmartTail;
( run in 0.260 second using v1.01-cache-2.11-cpan-3cd7ad12f66 )