Samuel, I know perl.exe -w. My question is what the line 192 in Oracle.pm tell me?
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 -----Original Message----- From: Gold, Samuel (Contractor) [mailto:[EMAIL PROTECTED] Sent: Tuesday, June 24, 2003 12:44 PM To: Chang, Mei Subject: RE: db connect warning message Read the docs. Usage: perl [switches] [--] [programfile] [arguments] -0[octal] specify record separator (\0, if no argument) -a autosplit mode with -n or -p (splits $_ into @F) -C enable native wide character system interfaces -c check syntax only (runs BEGIN and CHECK blocks) -d[:debugger] run program under debugger -D[number/list] set debugging flags (argument is a bit mask or alphabets) -e 'command' one line of program (several -e's allowed, omit programfile) -F/pattern/ split() pattern for -a switch (//'s are optional) -i[extension] edit <> files in place (makes backup if extension supplied) -Idirectory specify @INC/#include directory (several -I's allowed) -l[octal] enable line ending processing, specifies line terminator -[mM][-]module execute `use/no module...' before executing program -n assume 'while (<>) { ... }' loop around program -p assume loop like -n but print line also, like sed -P run program through C preprocessor before compilation -s enable rudimentary parsing for switches after programfile -S look for programfile using PATH environment variable -T enable tainting checks -t enable tainting warnings -u dump core after parsing program -U allow unsafe operations -v print version, subversion (includes VERY IMPORTANT perl info) -V[:variable] print configuration summary (or a single Config.pm variable) -w enable many useful warnings (RECOMMENDED) -W enable all warnings -X disable all warnings -x[directory] strip off text before #!perl line and perhaps cd to directory Thanks, Sam Gold -----Original Message----- From: Chang, Mei [mailto:[EMAIL PROTECTED] Sent: Tuesday, June 24, 2003 12:42 PM To: '[EMAIL PROTECTED]' Subject: db connect warning message 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 ************************************************************** ************************************************************** 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 **************************************************************
