foreach my $vals (values %{ $xml }) {