for my $datensatz_id (@sortedKeys){ my $e = $hlist->addchild(""); ...