[Haskell-cafe] happstack simpleHTTP & state monad