for(my $j=0;$j<@{$PA_ARRAY_FKT[$indexFunction]};$j++) { for(my $k=0;$k<@{$PA_ARRAY_FKT[$indexFunction]->[$indexParameter]};$k) { $CONTAINER[$indexFunction]->[$indexParameter]->[$INDEX_ARRAY_PARAM[$indexFunction]->[$indexParameter]] = $PA_ARRAY_FKT[$indexFunction]->[$indexParameter]->[$INDEX_ARRAY_PARAM[$indexFunction]->[$indexParameter]]; #--- ist der aktuelle Parameter der letzte --------------------------------------------------------------- if(($indexParameter+1) >= @{$PA_ARRAY_FKT[$indexFunction]} ) { #--- Ist der aktuelle ParameterWert der letzte --------------------------------------------------------------- if(($INDEX_ARRAY_PARAM[$indexFunction]->[$indexParameter]+1) >= @{$PA_ARRAY_FKT[$indexFunction]->[$j]} ) { $tmp_container[$a]->[$b]->[$c] = $PA_ARRAY_FKT[$indexFunction]->[$indexParameter]->[$INDEX_ARRAY_PARAM[$indexFunction]->[$indexParameter]]; ... ... ... #Dann soll das Array aufgefüllt werden. #Im nächsten Durchlauf kommen neue Werte hinzu #und hier muss ggf. auch aufgefüllt werden