Examples for 'crul::curl-options'

### ** Examples

## Not run: 
##D url <- "https://hb.opencpu.org"
##D 
##D # set curl options on client initialization
##D (res <- HttpClient$new(url = url, opts = list(verbose = TRUE)))
##D res$opts
##D res$get('get')
##D 
##D # or set curl options when performing HTTP operation
##D (res <- HttpClient$new(url = url))
##D res$get('get', verbose = TRUE)
##D res$get('get', stuff = "things")
##D 
##D # set a timeout
##D (res <- HttpClient$new(url = url, opts = list(timeout_ms = 1)))
##D # res$get('get')
##D 
##D # set user agent either as a header or an option
##D HttpClient$new(url = url,
##D   headers = list(`User-Agent` = "hello world"),
##D   opts = list(verbose = TRUE)
##D )$get('get')
##D 
##D HttpClient$new(url = url,
##D   opts = list(verbose = TRUE, useragent = "hello world")
##D )$get('get')
##D 
##D # You can also set custom debug function via the verbose 
##D # parameter when calling `$new()`
##D res <- HttpClient$new(url, verbose=curl_verbose())
##D res
##D res$get("get")
##D res <- HttpClient$new(url, verbose=curl_verbose(data_in=TRUE))
##D res$get("get")
##D res <- HttpClient$new(url, verbose=curl_verbose(info=TRUE))
##D res$get("get")
## End(Not run)