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