Hello. I am using Windows 2000 to connect to an Oracle database over the company
network. I have the DBI/DBD drivers installed on my computer. I want to connect using
the script below. When i run the script, it doesn't come back with anything. It just
goes to the command prompt. Can someone tell me how to do this, and what env variables
need to be set and where? I am not using any proxies btw.
Regards,
JC
#!perl -w
use strict;
use DBI;
# $ENV{"ORACLE_HOME"}="what goes here??";
my $dbh = DBI->connect('DBI:Oracle:','[EMAIL PROTECTED]','passwd'
) or die "Can't connect to Oracle database: \n $DBI::errstr\n";
my $msg =
$dbh->selectrow_array(
"SELECT SYSDATE || ' Hello Cygwin DBI! :-)' message FROM DUAL"
);
# Let's have some formatting fun! :-)
my $msg_len = length( $msg );
my $underline = '=' x ($msg_len + 6);
print "\n", $underline, "\n",
"|| ", ' ' x $msg_len, " ||", "\n",
"|| ", $msg, " ||", "\n",
"|| ", ' ' x $msg_len, " ||", "\n",
$underline, "\n\n";
$dbh->disconnect;
---------------------------------
Do you Yahoo!?
Yahoo! Domains - Claim yours for only $14.70/year
