How to do parallel programming in perl on Windows?

Question

I have used the following pattern of code in perl on a Unix system, but it crashes on Windows. How can I achieve the same thing using either forking or threads on Windows using perl?

use Parallel::ForkManager;

my $pm = Parallel::ForkManager->new($MAX_PROCESSES);

DATA_LOOP:
foreach my $data (@all_data) {
    # Forks and returns the pid for the child:
    my $pid = $pm->start and next DATA_LOOP;

    # ... do some work with $data in the child process ...

    $pm->finish; # Terminates the child process
}

What would be the equivalent of the above code using Thread::Queue? — CJ7
– CJ7, Commented Jan 5, 2017 at 0:00
Forks::Super by @mob should work on Windows. Also note its tips for windows. Try this post — zdim
– zdim, Commented Jan 5, 2017 at 1:45
sounds like your perl installation has some problems. tell more about the crashing — ysth
– ysth, Commented Jan 5, 2017 at 3:27

aggaton · Accepted Answer · 2017-01-05 00:22:29Z

1

Here is one example using fork:

#!/usr/bin/perl -w
use strict;


foreach my $data (@all_data) {
    my $pid;
    next if $pid = fork;    # Parent goes to next server.
    die "fork failed: $!" unless defined $pid;

    # From here on, we're in the child.  Do whatever the
    # child has to do...  The server we want to deal
    # with is in $data.

    exit;  # Ends the child process.
}

# The following waits until all child processes have
# finished, before allowing the parent to die.

1 while (wait() != -1);

print "All done!\n";

answered Jan 5, 2017 at 0:22

aggaton

3,4083 gold badges31 silver badges37 bronze badges

Sign up to request clarification or add additional context in comments.

1 Comment

ThisSuitIsBlackNot Over a year ago

That's not quite the same because it spawns scalar(@all_data) processes all at once. The OP's example spawns no more than $MAX_PROCESSES processes at a time.

Collectives™ on Stack Overflow

How to do parallel programming in perl on Windows?

1 Answer 1

1 Comment

Your Answer

Linked

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

1 Comment

Your Answer

Sign up or log in

Post as a guest

Linked

Related