(map print(sort-by(sort(port-map + read-line))string-size))