$db = DBI->connect(...... { PrintError => 1} ) ;