sig type result = OK | DECLINED | DONE | HTTP of int type t = Netcgi_apache.Apache.Request.t -> Netcgi_apache.Handler.result val register : Netcgi_apache.Handler.t -> string -> unit end