DBD::Oracle Bugzilla et les accents
Bonjour,
Je ne sais pas si je poste dans la bonne section...
Voilà mon problème :
Historiquement nous avions une instance bugzilla (4.4.4) tournant sur un serveur windows (IIS 7+ Active Perl 5.16.3 + Oracle instant client 12.1) connecté à une base Oracle (10.2.0.4).
Pour diverses raisons, j'ai déplacé l'appli sur un serveur linux (Debian 7 + Oracle instant client 12.1).
Le soucis se situe dans la restitution des accents.
Si j'effectue une requête (un simple select SHORT_DESC from BUGS where BUG_ID='monbug') via SQLPlus, j'obtiens :
Visualiser les fichiers TXT sans passer par une étape de conversion.
Tant sur Windows que linux.
Si j'affiche maintenant la page de ce bug via l'appli, j'obtiens correctement les accents via le serveur Win, mais ça via le serveur linux :
Visualiser les fichiers TXT sans passer par une etape de conversion.
Un simple test Perl donne :
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
| use DBI;
use DBD::Oracle;
my $dbh = DBI->connect("dbi:Oracle:host=$oracle_server;port=$oracle_port;sid=$oracle_sid", $oracle_user, $oracle_password)
or die "Impossible de se connecter à la base Oracle : " . DBI->errstr;
my $sth = $dbh->prepare("SELECT SHORT_DESC FROM $oracle_table_de_test where BUG_ID=5054")
or die "Impossible de preparer la requette: " . $dbh->errstr;
$sth->execute()
or die "Impossible d'exécuter la requette: " . $sth->errstr;
while ( my @data = $sth->fetchrow_array() )
{
my $shortdesc = $data[0];
print "\t$shortdesc\n";
}
if ($sth->rows == 0)
{
print "Table vide\n";
}
$sth->finish;
$dbh->disconnect; |
J'obtiens :
Visualiser les fichiers TXT sans passer par une �pe de conversion.
Si quelqu'un a une idée ...
Merci
Vincent
