Real World Haskell Chapter1
--wc.hs main = interact wordCount where wordCount input = show(length(lines input)) ++ "\t" ++ show(length(words input)) ++ "\t" ++ show(length( input)) ++ "\n"
--wc.hs main = interact wordCount where wordCount input = show(length(lines input)) ++ "\t" ++ show(length(words input)) ++ "\t" ++ show(length( input)) ++ "\n"