Select Code to Download

while (1) {
    $pm->start and next;
...
    ...
    $pm->finish;
}

    $pm->wait_all_children;

$pmgr->run_on_finish(
    sub {
...
        waitpid $pid, 0;
    }
);