my $dbh = DBI->connect("dbi:Oracle:FOO", ...);