sS dropUriPrefix(S prefix, S uri) {
  prefix = dropTrailingSlash(prefix);
  if (empty(prefix)) ret uri;
  if (eq(uri, prefix) || startsWith(uri, prefix + "/"))
    ret substring(uri, l(prefix));
  ret uri;
}