in reply to Sorting @ary by line length?
@sorted = sort { length($b) <=> length($a) } @unsorted; [download]
-clay