CGI m a is an instance of MonadIO if m is, so <div><br></div><div>import Control.Monad.Trans</div><div><br></div><div>cgiTMain = do</div><div>   gen &lt;- liftIO getStdGen</div><div>   ...</div><div><br></div><div>should work.<br>
<br></div>