my @sortedIndexes = ();

$sortedIndexes[0][0] = { a => 1 };
$sortedIndexes[0][1] = { a => 0 };

for (my $i  = 0; $i < scalar(@sortedIndexes); $i++) {
   @{$sortedIndexes[$i]} = sort { $a->{a} <=> $b->{a} } @{$sortedIndexes[$i]};
}
use Data::Dumper;
print Data::Dumper->Dump([\@sortedIndexes])."\n";