if (FALSE) { # rlang::is_installed("webfakes")
# This fails without throwing an error
req <- httr2::request(httr2::example_url()) |>
httr2::req_url_path("/status/404")
resp <- gracefully(req, httr2::req_perform)
print(resp)
# This request succeeds
req <- httr2::request(httr2::example_url())
resp <- gracefully(req, httr2::req_perform)
print(resp)
}
Run the code above in your browser using DataLab