## ----include = FALSE----------------------------------------------------------
knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>"
)

## ----eval = FALSE-------------------------------------------------------------
# install.packages("ctrlvee")

## ----eval = FALSE-------------------------------------------------------------
# #install.packages("pak")
# pak::pkg_install("vpnagraj/ctrlvee")

## ----eval = FALSE-------------------------------------------------------------
# library(ctrlvee)
# 
# ## crawl code chunks from a rendered quarto chapter
# result <- crawl_chunks("https://dstt.stephenturner.us/validation.html")
# 
# ## inspect the result
# result

## ----eval = FALSE-------------------------------------------------------------
# ## check the detected strategy for a rendered page
# detect_strategy("https://dstt.stephenturner.us/validation.html")

## ----eval = FALSE-------------------------------------------------------------
# ## force the html strategy explicitly
# crawl_chunks(
#   "https://dstt.stephenturner.us/validation.html",
#   strategy = "html"
# )