[Haskell-cafe] Haskell IO problem