PerlDiscuss - Perl Newsgroups and mailing lists wrote:
Hi there,
Hello,
Can anyone recommend a good way to have a perl script that constantly monitors for the creation of new files on UNIX and launches another process?
Not sure if someone else recommended this but:
[untested code - for example only] #!/usr/bin/perl
use strict; use warnings;
while(1) { opendir DIRH, '/foo/bar' or die $!; my @curlst = <DIRH>; closedir(DIRH); if(grep /watch for me/, @curlst) { # launch other process here... } sleep(15); }
Then start it running like so: ./thisscript.pl &
Thanks!
np, HTH
Lee.M - JupiterHost.Net
Cheers, Ben
-- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>