# NOT RUN {
hardir <- system.file("extdata", package = "curlconverter")
harfile <- file.path(hardir, "har1.har")
entry <-
fromJSON(harfile, simplifyVector = FALSE)[["log"]][["entries"]][[1]]
req <- entry[["request"]]
req %>% from_request
# }
Run the code above in your browser using DataLab