conn <- dbConnect(MySQL(), user=conf$user, password=conf$passws, host=conf$host, dbname=conf$db)

conf$conn <- dbConnect(MySQL(), user=conf$user, password=conf$passws, host=conf$host, dbname=conf$db)

library(pool)
library(RPostgreSQL)

connect <- function(cfg) {
  config <- config::get(config = cfg)
  dbPool(
    drv = dbDriver("PostgreSQL", max.con = 100),
    dbname = config$dbname,
    host = config$host,
    port = config$port,
    user = config$user,
    password = config$password
  )
}
conn <- lapply(c("db1", "db2"), connect)