##Variablen für parallele Downloads
my @child_pids = ();
my $max_childs = 2;

for my $i (0..$#ini_data){
    
    $c_childs = @child_pids;
             if($c_childs < max_childs)
        {
            #Erzeugen von Child-Prozessen
            
            $pid = fork();
            
            #Child-Prozess Ablauf
            if($pid == 0) 
               
 {
               
 WGET BEFEHL
                                                   }

            else
               
 {
               
 push(@child_pids, $pid);
               
 }
                       }
}

foreach(@child_pids) 
{
waitpid($_, 0);
}