for my $datensatz_id (sort keys(%{$hash_ref})){
        my $e = $hlist->addchild("");
...