Select Code to Download

sub pullDataFromDbWithDirectory {
    my $_dir = $_[0];
...
   push(@IDLE_THREADS,$ithread);

}

my @threads = map threads->create(\&doOperation), 1 .. $maxNumberOfPar
+allelJobs;
pullDataFromDbWithDirectory($directory);
...
$_->join for @threads;

printData();