`wc` in haskell using pipes