foreach my $row ( sort { $a->[1] <=> $b->[1] || $a->[2] <=> $b->[2] } @$sheet ) {