# NOT RUN {
if (reticulate::py_module_available("sqlparse")) {
library("sqlparseR")
raw <- "select*from foo; select*from bar;"
parsed <- sql_parse(raw)
## Analyzing the parsed statements
# e.g., get name of identifier in second statement
n <- parsed[[2]]$get_name()
print(n)
# e.g., get a (Python) generator yielding ungrouped tokens of the first statement
token_it <- parsed[[1]]$flatten()
for (t in reticulate::iterate(token_it)) {
print(t)
}
}
# }
Run the code above in your browser using DataLab