diff --git a/geoip.R b/geoip.R index e3a6ff2..180fae2 100644 --- a/geoip.R +++ b/geoip.R @@ -16,13 +16,13 @@ read_delim("access.log", delim = " ", col_names = c("ip", "null1", "user", "time known_ips <- character(0) -src_sqlite("access.db") %>% +db %>% tbl("geoip") %>% select(query) %>% collect %>% pull(query) -> known_ips -src_sqlite("access.db") %>% +db %>% tbl("access") %>% select(ip) %>% collect %>%