交互（concat。排序行）cba

Question

为什么下面的代码不起作用 - 它没有提供所需的输出。我希望它对字符串进行排序（例如cba - ＆gt; abc）。在我用文件结束后发出信号 ^ D我得到：cba。

import Data.List
import Data.Char
import System.IO (isEOF)


main =
   interact (concat . sort .lines)

Answer 1

看起来你想要更像的东西：

import Data.List

main = interact (unlines . map sort . lines)

对输入的每一行进行排序。