Discussion :

[ibrahima13]

Bonjour tout le monde,

Utilisateur habituel de SAS je bloque sur un probleme de Perl (code je n'ai pas écrit).

J'ai un script Shell qui lance un programme perl. Lors de l'éxecution de ce script Shell j'ai l'erreur suivante:

install_driver(Oracle) failed: Can't locate DBD/Oracle.pm in @INC (@INC contains: /usr/lib64/perl5/5.10.0 /usr/lib64/perl5 /usr/local/lib64/perl5 /usr/local/share/perl5 /usr/lib64/perl5/vendor_perl /usr/share/perl5/vendor_perl /usr/lib64/perl5 /usr/share/perl5 .) at (eval 3) line 3.

J'ai vérifié que j'ai bien le package DBI.pm car quand je lance la commande suivante sous Linux je n'ai aucun message d'erreur:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

perl -MDBI -e -1

Le probleme vient des variables d'evironnments dans le programme Shell, mais je bloque sur ça. Voici mes variables d'environmments qui sont dans le script shell:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
#!/bin/bash
# ORACLE_HOME
ORACLE_HOME=/ec/sw/oracle/client
export ORACLE_HOME
PERL5LIB=/usr/lib64/perl5
export PERL5LIB
LD_LIBRARY_PATH=user/lib64/perl5:$LD_LIBRARY_PATH
export LD_LIBRARY_PATH

Pourriez-vous m'auder s'il vous plait ? Je vous remercie d'avance.

Ibrahima

[Gardyen]

DBI n'est pas le seul module à installer, il faut aussi celui qui concerne ta bdd, à savoir dbd::oracle
est-il bien installé ?

[Lolo78]

Exactement, Gardyen a bien raison. Le message d'erreur est clair: ce n'est pas le module DBI qui est déclaré manquant par Perl, mais le driver de base de données (DBD) spécifique à Oracle, à savoir le module Oracle DBD/Oracle.pm. C'est donc lui qu'il te faut installer.

[ibrahima13]

Bonjour Gardyen et Lolo78,

Tout d'abord merci de votre réponses. Effectivement j'ai essayé de lancé le code suivant:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
#!/usr/bin/perl
 
$oracle_server="xxxxx";
$oracle_sid="xxxxx";
$oracle_port="xxx";
$oracle_user="xxxx";
$oracle_password="xxxxx";
$oracle_table_de_test="xxxxx";
 
use DBI;
use DBD::Oracle;
 
my $dbh = DBI->connect("dbi:Oracle:host=$oracle_server;port=$oracle_port;sid=$oracle_sid", $oracle_user, $oracle_password)
 
$dbh->disconnect;

J'ai toujours le même message d'erreur. Je vais donc faire installer le module en question et j'espere que cela va marcher. Je vous remercie beaucoup de vos réponses :-)

Ibrahima