countline2.hs
main = do cs <- getContents (print . length . lines) cs
[Sample Code Index]
[Support Site Top]