sig
  type t = string option * string option
  val parse : string -> Ocsigen_header.Mime_type.t
end