Help for this page

Select Code to Download


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