> If you are using Windows 2000 or later you can use the Job subsystem
> to set a time limit on the subprocess. Here is a simple job.pl script
> that executes any command, but only for a specified number of seconds:
>
> use Win32::Job;
> my $job = Win32::Job->new;
> my $timeout = shift;
> my $exe = $ARGV[0];
> s,",\\",g, ($_ = qq("$_")) for @ARGV;
> $job->spawn($exe, "@ARGV");
> $job->run($timeout);
>
I didn't know Win32::Job!
Nice to hear it...
Regards,
HT
_______________________________________________
Perl-Win32-Users mailing list
[email protected]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
