sub ref_to_db {
  my $db = DBI->connect(...);
  return $db;
}