user list,
My program successfully connected to oracle DB and performed all sql
statements, but if I uses
perl.exe -w then I got the following warnings. (Note: the script is still
working and executes the sql statements successfully).
Can some one tell me how can I get rid of this warnings. What does this
error mean?
connecting to Oralce.... Use of uninitialized value in concatenation <.> or
string
at C:\perl5.6.1.633\site\lib\DBD\Oracle.pm line 192
Thanks
Chang
The following is the subroutine for connect_db
sub connect_db()
{
my $dbh1;
my $db = 'ORA'; #should it be oracle?
my $hostname = 'host=test01';
#my $port = 'port=1521';
my $sid = 'sid=ORA';
my $user = 'abc'; # fake username... use your own
my $password = 'abcabc'; # fake password... use your own
my $dsn = "dbi:Oracle:$db;$hostname;$sid;$user;$password;";
# Here we make a reference to the database handle object (hash).
#my $tracefile = 'trace';
#my $trace_level = 4;
#my $dbit = DBI->trace($trace_level, $tracefile);
$dbh1 = DBI->connect( $dsn, $user, $password, {
PrintError => 1,
RaiseError => 1,
AutoCommit => 1
}
) || die "Can't execute statement: $DBI::errstr";
return( $dbh1 );
}
**************************************************************
This message, including any attachments, contains confidential information intended
for a specific individual and purpose, and is protected by law. If you are not the
intended recipient, please contact sender immediately by reply e-mail and destroy all
copies. You are hereby notified that any disclosure, copying, or distribution of this
message, or the taking of any action based on it, is strictly prohibited.
TIAA-CREF
**************************************************************
