for my $this (sort {$a->{THIS} cmp $b->{THIS} } @{$xml->{policies}}) {