Re: Odd behaviour of Parallel::ForkManager

[Corion]

You have enabled use warnings;. The next step is to read the warnings that Perl outputs:

C:\Users\Corion>perl -wc Projekte\tmp.pl
Found = in conditional, should be == at Projekte\tmp.pl line 37.
Found = in conditional, should be == at Projekte\tmp.pl line 41.
Projekte\tmp.pl syntax OK

What have you done to address these warnings?

[ravi45722]

I replaced "=" with "eq". Now the warning is not there.

[Corion]

If you expect interleaved output, you will need to disable output buffering and make your code much slower:

sub alpha
{
        foreach my $i (900 .. 1900)
        {
                print 'A',"\t";
                sleep rand(2);
        }
}

sub numeric
{
        foreach my $j (1 .. 1000)
        {
                print $j,"\t";
                sleep rand(2);
        }
}

# Make print() output unbuffered;
$| = 1;

LINKS:
foreach my $linkarray (@links)
{
        $pm->start and next LINKS; # do the fork
...