i am trying to monitor the filesystem ..
i have written the following code ::
#!/usr/bin/perl
use strict;
use SGI::FAM;
my $conn = new SGI::FAM;
$conn->monitor( "/var/log/messages" );
while (1) {
my $event = $conn->next_event;
print $event->filename, " ",
$event->type, "\n";
}
this is working perfectly for the local machine but how do i
implement
it for remote machine????
--~--~---------~--~----~------------~-------~--~----~
You received this message because you are subscribed to the
Google Groups "Perl Programming" group.
To post to this group, send email to perl-programming googlegroups.com
To unsubscribe from this group, send email to
perl-programming-unsubscribe googlegroups.com
For more options, visit this group at http:
//groups.google.com/group/perl-programming
-~----------~----~----~----~------~----~------~--~---
|