Help for this page
my $pool = Thread::Pool->new( { workers => $numCPUs, do => \&workerSub, } );
foreach my $href (@hrefSubsets) { my $jobid = $pool->job( $href, $param1, $param2, $param3 ); push(@threadPool, $jobid); }
for(1..$totalThreads) { my $results = $pool->result_any( \$jobid ); }