R/get_form_entry_ids.R

In googleformr: Collect Data Programmatically by POST Methods to Google Forms

#' Get Google Form Entry Ids From Scrape
#'
#' Get Google Form Entry Ids From Scrape
#'
#' @param scrape HTML Output from Scraping Google Form
#' @export
#' @examples
#' \dontrun{
#' url %>% get_form() %>% get_form_entry_ids() -> entries
#' }
get_form_entry_ids <- function (scrape) {
    field_names <- names(rvest::html_form(scrape)[[1]][["fields"]])
    unique(field_names[grepl("entry.", field_names)])
}