my %sort_xml = @output; #### foreach my $key ( sort { $sort_xml{$a} <=> $sort_xml{$b} } ( keys(%sort_xml) ) ) #### @sorted = sort { $a->attr_method cmp $b->attr_method } @out;
## foreach my $key ( sort { $sort_xml{$a} <=> $sort_xml{$b} } ( keys(%sort_xml) ) ) ##
## @sorted = sort { $a->attr_method cmp $b->attr_method } @out;