Subject: | tempfile() error |
Date: | Thu, 29 Oct 2015 21:04:08 +0000 |
To: | "bug-Parallel-Loops [...] rt.cpan.org" <bug-Parallel-Loops [...] rt.cpan.org> |
From: | "Furnholm, Teal" <tealfurn [...] med.umich.edu> |
Greetings,
I am learning how to use the Parallel:loop module and have had an error in tempfile().
I am running the below (very simple) perl script. It will work. I run the exact same thing again - it doesn't work. I run the exact same thing again - it works. I change it a bit - it works/doesn't work. = intermittent.
The exact error message is in the attached jpeg screen shot of my command prompt.
I am running strawberry perl that I downloaded a few months ago on windows 10.
Best,
Teal
_______________________script_______________________________
use Parallel::Loops;
my @num = 1 .. 50;
my $pl = Parallel::Loops->new(5);
my %out;
$pl->share(\%out);
$pl->foreach( \@num, sub {
my $num = $_; # note this uses $_, not @_
$out{$num} = $num ** 2;
});
foreach (sort keys %out) {print "$_ : $out{$_}\n";}
**********************************************************
Electronic Mail is not secure, may not be read every day, and should not be used for urgent or sensitive issues
Message body is not shown because sender requested not to inline it.