[Haskell-cafe] SYB: queries using IO Monad