3 import CGI hiding (div, head, map, span)
9 cgi CGIInfo {cgiUrl = url, cgiPathInfo = pi, cgiContentType = ct, cgiContents = c, cgiCookies = co, cgiArgs = as, cgiHandle = h} parms = do
10 putStr "content-type: text/html\n\n"
19 case assocParm "test" parms of
20 Nothing -> putStr "Parameter 'test' not provided"
21 Just x -> putStr $ "Value of test = "++x