my @sorted = sort { $a->[$col] <=> $b->[$col] } @origarray;