let get_env v help =
  try Sys.getenv v with e -> failwithf "Missing env-variable: %S (%s)" v help