sig
  val redirect :
    ?msg:string ->
    ?status:Nethttp.http_status ->
    Netcgi.cgi -> string -> Nethttp.http_status
  val write :
    ?status:Nethttp.http_status ->
    ?content_type:string -> Netcgi.cgi -> string -> Nethttp.http_status
end