let of_string s =
  let uri = Uri.of_string s in
  of_uri uri