sort {length $columnA <=> length $columnB}