Select Code to Download

my $max_children = 5;
my $pm = Parallel::ForkManager->new($max_children);
...
    $pm->finish;
}
$pm->wait_all_children;