Help for this page
my $dbh = DBI->connect($dsn, $user, $pass, { RaiseError => 1, AutoCom +mit => 1 }) or die 'Connexion a la base impossible: ' . DBI->errstr;
DBI connect('XX','xx',...) failed: ERROR OCIEnvInit at xx_dbfunc.pm li +ne 36