my $header = ${$ele->child()}{0}; # erzeuge headerzeile foreach my $ele2 (@documentlist){ if($header eq ${$ele->name()}){ my %hash = %{$ele2->spalteninfo()}; my @sorted = sort keys %hash; $string .= '