fork download
  1. import Control.Applicative
  2.  
  3. main = (map words . lines <$> getContents) >>= print
Success #stdin #stdout 0s 6248KB
stdin
1 2 3
4 5 6
stdout
[["1","2","3"],["4","5","6"]]