my $dsn = "dbi:$driver:database=$database;host=$host;port=$port";

  my $dbh = DBI->connect(
    $dsn,
    $cfg->{username},
    $cfg->{password},
    {
      AutoCommit => 1,
      RaiseError => 0,
      PrintError => 0,
      PrintWarn  => 0,
    },
  );