# NOT RUN {
url <- "https://httpbin.org"
# set curl options on client initialization
(res <- HttpClient$new(url = url, opts = list(verbose = TRUE)))
res$opts
res$get('get')
# or set curl options when performing HTTP operation
(res <- HttpClient$new(url = url))
res$get('get', verbose = TRUE)
res$get('get', stuff = "things")
# set a timeout
(res <- HttpClient$new(url = url, opts = list(timeout_ms = 1)))
# res$get('get')
# set user agent either as a header or an option
HttpClient$new(url = url,
headers = list(`User-Agent` = "hello world"),
opts = list(verbose = TRUE)
)$get('get')
HttpClient$new(url = url,
opts = list(verbose = TRUE, useragent = "hello world")
)$get('get')
# }
Run the code above in your browser using DataCamp Workspace