[Haskell-cafe] Combining Pipes with Callbacks