my $dbh = DBI->connect("dbi:Oracle:FOO", ...); #### ------------ :Wq Not an editor command: Wq