my @sorted = sort { $a <=> $b } @unsorted;