Hi All,

I experience a trouble with Perl script using DBI running under Mod_perl 
and Registry
If you have an idea from where the problem may come....

Here is the error :

DBI->connect failed: ORA-12154: TNS:could not resolve service name (DBD: 
login f
ailed) at /disc1/sherpa_a/indicators2/perl/activity/toto.pl line 5
[Wed Mar 29 20:11:32 2000] [error] ORA-12154: TNS:could not resolve service 
name
  (DBD: login failed) at /disc1/sherpa_a/indicators2/perl/activity/toto.pl 
line 5

The ORACLE_HOME is well set ! I first tried to use Apache::DBI but i get 
this error
so I go back to DBI only but it's exactly the same error.
My scripts run well if I launch it from the command line.

Here is extracts of my httpd.conf

     # Additionnal directory (for indicators)
     Alias /indicators2/perl "/disc1/sherpa_a/indicators2/perl"
     <Location /indicators2/perl>
         SetHandler      perl-script
         PerlHandler     Apache::Registry
         PerlSendHeader  On
         Options         +ExecCGI
     </Location>

at the end:

PerlSetEnv      ORACLE_HOME     /disc1/sherpa/oracle
PerlRequire             conf/startup.pl
PerlFreshRestart        On

Here is the startup.pl

#!/usr/bin/perl

# Commonly used modules
use Apache::Registry ();
use Apache::Constants ();
use CGI ();
#use Apache::DBI ();

#$Apache::DBI::DEBUG=2;
#Apache::DBI->connect_on_init("dbi:Oracle:indicators", "indic", "xxxx",
  { AutoCommit => 0, RaiseError => 1, PrintError => 0 } )
  or die $DBI::errstr;

1;

And finally my test file:

#!/usr/bin/perl

use DBI;

my $dbh = DBI->connect( 'DBI:Oracle:INDICATORS', 'indic', xxxx',
     { AutoCommit => 0, RaiseError => 0, PrintError => 1 } )
     or die $DBI::errstr;

$dbh->disconnect;

Thanks in advance
Jerome

Reply via email to