Beefy Boxes and Bandwidth Generously Provided by pair Networks
laziness, impatience, and hubris
 
PerlMonks  

(Guildenstern) Re: Cron Job??

by Guildenstern (Deacon)
on Apr 04, 2001 at 01:03 UTC ( [id://69476]=note: print w/replies, xml ) Need Help??


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!

Log In?
Username:
Password:

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

How do I use this?Last hourOther CB clients
Other Users?
Others chilling in the Monastery: (3)
As of 2024-04-19 23:37 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found