Исправление dodevich, 01.08.15 20:33 (текущая версия) :
Добавил:
mapM_ putStrLn . map (reverseWords . words) $ lines contents
Коряво...
Исходная версия dodevich, 01.08.15 20:25:
mapM_ putStrLn . map reverseWords . map words $ lines contents