http://www.perlmonks.org?node_id=69476


in reply to Cron Job??

If your "FTP folder" is actually on the NT box, Win32::ChangeNotify would be a good solution. You can basically set your script to wait until a change in the directory (i.e. adding files) happens, then run whatever code you need to. Less messy than playing with NT's dog-awful at command.

Update: I knew I had some code that used it somewhere. Here's a simple example:
use Win32::ChangeNotify; my $dir = "c:/some/dir/name"; $notify = Win32::ChangeNotify->new($indir, 0, FILE_NAME); while (1) { $notify->wait or warn "Problem waiting: $!\n"; # Will now wait to execute following code # until a file event happens in $dir # ...stuff ... $notify->reset; } $notify->close;

I put the while (1) for brevity. In my actual code, I test to see if the script should be "finished" by checking for existence of a semi-lockfile and do while (!$done).

Guildenstern
Negaterd character class uber alles!