my @sorted = sort { return $a cmp $b } @unsorted;