DBI->connect("dbi:Oracle:$host:$port/$service_name", $user, $password, {RaiseError => 1});