Sound like you want to sort by parent and then by message ID. Something like this will work:

my @sorted = sort { $a->{parent} <=> $b->{parent} ||
                    $a->{messageId} <=> $b->{messageId} } @$testarray;

foreach (@sorted) {
  print "$_->{messageId}\t$_->{parent}\n";
}
[download]

--
<http://www.dave.org.uk>

"The first rule of Perl club is you do not talk about Perl club."
-- Chip Salzenberg