«

Hi folks,

it's probably a simple question...

I want to start several processes with perl whose names are stored in
an array. Before calling/executing the next file I want to wait a
certain time.

How do I have to modify the example below?

# Run multiple background processes.
my @processes = ("process01.exe 1",
"process02.exe 2",
"process03.exe 3");

unless (fork)
{
# running as child process
exec $_ or die "Exec of $_ failed!"; # shouldn't happen
} # only parent runs here
}

Has anyone a suitable solution? That'd be kind?


Thanks a lot in advance.
Mario

wrote in news:1115713069.225791.240130
@f14g2000cwb.googlegroups.com:

> I want to start several processes with perl whose names are stored in
> an array. Before calling/executing the next file I want to wait a
> certain time.

perldoc -f sleep

Sinan
--
A. Sinan Unur <>
(reverse each component and remove .invalid for email address)

comp.lang.perl.misc guidelines on the WWW:
http://mail.augustmail.com/~tadmc/cl...uidelines.html

wrote:
> Hi folks,
>
> it's probably a simple question...
>
> I want to start several processes with perl whose names are stored in
> an array. Before calling/executing the next file I want to wait a
> certain time.
>
> How do I have to modify the example below?
>
> # Run multiple background processes.
> my @processes = ("process01.exe 1",
> "process02.exe 2",
> "process03.exe 3");
>
> unless (fork)
> {
> # running as child process
> exec $_ or die "Exec of $_ failed!"; # shouldn't happen
> } # only parent runs here
> }
>
> Has anyone a suitable solution? That'd be kind?

you can use Proc::Queue for that:

use Proc::Queue qw(system_back);
Proc::Queue::delay(10); # sets min delay between fork calls
Proc::Queue::size(5); # sets max number of children

system_back $_ for @processes;

Cheers,

- Salvador

<> wrote:

> I want to wait a
> certain time.


perldoc -f sleep


--
Tad McClellan SGML consulting
Perl programming
Fort Worth, Texas