问如何在Windows环境下用perl进行并行编程？

EN

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
}