Discussion :

[eliohann]

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 :

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

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

[6ril23]

Je pense que ton problème vient d'une différence d'encodage des caractères (le plus probable Unicode/UTF-8)

[eliohann]

Oui je pense également mais je n'ai pas le moindre idée de comment le résoudre...

Si toi, ou quelqu'un d'autre, a une idée, je suis preneur

[Lolo78]

Essaie déjà d'ajouter:

Code :

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

1
2
 
use UTF8;

Ça peut (peut-être) suffire à résoudre le problème.

Sinon, as-tu le problème avec des enregistrements créés sous Debia, ou seulement avec des enregistrements migrés depuis Windowsz?

[eliohann]

Salut,

Merci d'essayer de m'aider.

Alors les données n'ont pas bougées, elles sont sur la même instance Oracle (Oracle 10gr2 sous AIX) ...

J'ai tout de même progressé un peu :
1) Le jeu de caractère pour la base est : WE8ISO8859P15 et pas AL32UTF8 ...
2) si je rajoute dans la boucle la partie en gras :

Code :

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

1
2
3
4
5
6
while ( my @data = $sth->fetchrow_array() )
{
    Encode::from_to($data[0], 'iso-8859-15', 'utf8');
    my $shortdesc = $data[0];
    print "$shortdesc\n";
}

J'obtiens bien :
Visualiser les fichiers TXT sans passer par une étape de conversion.

Je suis en train de regarder pour migrer la base dans 1 autre jeu de caractère, à moins qu'une solution plus simple existe