You probably want to do something fancier with giving jobs unique names and so on, but that's the idea.use File::Slurp; chdir '/path/to/shared/directory/jobs/dropoff' or die $!; for (;;) { foreach my $job (read_dir(".")) { next unless $job =~ /\.pl$/; system "perl -w $job > $job.output"; rename $job, "$job.ran" or warn $!; } sleep 5; }
Make sure the dropoff area has appropriate permissions.
As for the dynamic IP thing, get your sysadmin to set up DNS properly so you can refer to the machine by name.
If that's not possible, an easy fix would be to do whatever the windows equivalent of HEAD http://machine-you-control/here-i-am-`hostname` is in a DHCP client script, and then look in the logs on machine-you-control.
In reply to Re^3: Getting VBA code to run a Perl script in a network drive
by PreferredUserName
in thread Getting VBA code to run a Perl script in a network drive
by Win
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |