[Haskell-cafe] Replacing stdin from within Haskell