$dbh = DBI->connect("DBI:Oracle:host=$SERVER;sid=$SID", $UID, $PWD);