Source

haskellblog / blog.hs

Full commit
-- "Hello, world" in CGI

import Network.CGI
import Text.XHtml

page :: Html
page = body << h1 << "Hello, blogosphere!"

cgiMain :: CGI CGIResult
cgiMain = output $ renderHtml page


main :: IO ()
main = runCGI $ handleErrors cgiMain