Select Code to Download

my $db_ok = do {
   defined DBI->connect(
...
      { AutoCommit => 1, RaiseError => 0, PrintError => 0 },
   )
};