my @sort = sort {$a cmp $b} @array;