my $dbh = DBI->connect(SQLCONNECT,SQLUSER,SQLPASS,RaiseError => 1);