try({
## extract substrings based on regular expressions
string_01 <- paste0(
"The itsy bitsy spider ",
"Went up the water spout. Down came the rain ",
"And washed the spider out.")
print(string_01)
custom_grep(xml_data = string_01, tag = "strong", format = "char")
custom_grep(xml_data = string_01, tag = "strong", format = "list")
}, silent = TRUE)
Run the code above in your browser using DataLab