Hello
I have been running Perl 5.8 w/ DBI and DBD-Oracle for years.  I
recently installed Oracle Discoverer on my Windows XP box, and it has
totally hosed my ability to connect to any of the DBs through perl.  I
have gone so far as to uninstall Oracle Business Intelligence
(Discoverer), and to uninstall and reinstall Perl 5.8.8, DBI 1.54, and
DBD-Oracle 1.17.  I cannot figure out how to get my connectivity back.
The following script (logon parms starred out):
 

        use DBI;
        # magic line required for TIERS database access
        $ENV{NLS_LANG}= 'AMERICAN_AMERICA.AL32UTF8';
        $ENV{ORACLE_HOME} = "c:\\oracle\\ora92";
        print "$ENV{ORACLE_HOME}\n";
         
        # user ID, password, DB (to be removed to environment if program
productionalized)
        ($db, $uid, $pwd) = ('*****','******','******');
        my %attr = (RaiseError => 0, AutoCommit =>1);
         
        if (!($dbh = DBI->connect("DBI:Oracle:$db","$uid","$pwd",
\%attr))) {
         die("DB Connection failure for $uid/[EMAIL PROTECTED]");}
         
        $sql = qq{SELECT SYSDATE FROM DUAL};
         
        if (!($sth = $dbh->prepare($sql))) {die ("Can't prepare
$sql\n");}
         
        if (!($sth->execute())){
         die("Can't execute sysdate select statement.");
        }
         
        $mydate = $sth->fetchrow();
         
        print "SYSDATE = $mydate\n";
         
        exit;
        

gives the following error (logon parms starred out):
 

        C:\Documents and Settings\mike.ready\My Documents\Scripts>perl
ConnectFailing.pl
         
        c:\oracle\ora92
        DBI connect('*****','******',...) failed: ERROR
OCINlsEnvironmentVariableGet
        (OCI_NLS_CHARSET_ID) Check ORACLE_HOME and NLS settings etc. at
ConnectFailing.p
        l line 11
        DB Connection failure for ******/[EMAIL PROTECTED] at
ConnectFailing.pl line
        12.

 
ORACLE_HOME matches the ORACLE_HOME parameter seen by TOAD; Oracle Home
Selector tells me I have only one Oracle home.  One possible clue: when
I uninstalled Perl, I was unable to get rid of C:\Perl\bin\oci.dll - the
system claimed it was in use, even after a reboot.  I am flummoxed at
this point, and am running reports on one of my analysts' PC.  Help!
 
Thanks,
Mike R.
Michael P. Ready
Texas ACCESS Alliance
Work 512-533-3959, Mobile 512-796-7085, Fax 512-437-6532
AIM: michaelpready
[EMAIL PROTECTED]

Reply via email to