Discussion :

[paissad]

Bonjour tout le monde,

j'ai une variable $text qui est le résultat de sortie d'une fonction qui retourne un string .... mais dans $text .... il y'a des caractères accentués ....et lorsque je fais un print $text; ou lorsque je fais des regexp sur $text , je n'ai pas tous les résultats attendus vu que les caractères accentués sont bizarroïdes :/

Et du coup, lorsque j'utilise aussi le module XML::Writer pour créer un fichier XML, les caractères accentués sont mal affichés
Voici un exemple du print $text;

Son atelier exécute tous types de travaux architecturaux en fer forgé comme la création ... Développement de logiciels de datamining (fouille de données) ...

on voit "données" à la place de "données" ....

POURTANT, mon script utilise prend dans ses arguments des chaines contenant des accents ... (fouille de données) ... et lorsque je fais print @ARGV[1] ... j'ai bel et bien "fouille de données" très bien affiché

Merci d'avance pour votre aide

[Beniou]

Bonjour,

Le module Encode (http://search.cpan.org/~dankogai/Encode-2.39/Encode.pm) peut je pense t'aider.

cf un post sur des problèmes d'accents dans le shell -> http://www.developpez.net/forums/d91...-saisie-shell/

[estofilo]

on voit "données" à la place de "données" ....

Il s'agit d'un E accentué encodé en UTF8 (2 octets) mais ces 2 octets sont interprétés par un composant d'affichage comme 2 caractères encodés en iso-latin (iso-8859-1 ou iso-8859-15).
En général les données XML sont encodées en UTF8 comme l'indique la première ligne du fichier:

<?xml version="1.0" encoding="UTF-8"?>

Dans ce cas c'est le terminal servant à afficher qu'il faut régler sur de l'UTF8, le fichier lui-même n'a pas de problème.

Mais d'une manière générale, quand on manipule du texte hors ASCII de base (=américain), il n'est hélas pas possible d'échapper aux questions:
- quel encodage j'ai en entrée?
- quel encodage je dois produire en sortie?
- est-ce que mon programme doit s'adapter à l'environnement d'exécution (variables LANG et LC_* sous Posix) ou est-ce qu'au contraire il doit ignorer l'environnement et forçer un encodage?

[djibril]

A lire aussi.

[paissad]

J'avais oublié de préciser que je suis sous linux donc je pense que ceci ne marchera pas pour moi http://perl.developpez.com/sources/?...nal#AccentsDOS ( je l'avais lu avant de poster ma question)
Et que par ailleurs j'avais utilisé le module Encode, mais cela ne m'a pas aidé
voici en gros ce que j'avais fait avec le module Encode;

Code :

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

1
2
3
4
5
6
use Encode;
 
# $text est déjà defini et contient un texte
 
$text = encode("iso-8859-1", $text);
print $text;

j'ai aussi essayé

Code :

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

$text = encode("utf8", $text);

j'ai aussi fait use utf8; pour voir ...

Mais bon, cela n'a rien changé ^^

[djibril]

é est l'équivalent du é utf8, donc tu devrais faire un

Code :

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

$text = decode("uf8", $text);

[paissad]

J'ai réglé la plupart de mes problèmes d'encodage avec decode("utf8",$text); ... mais il y'a un texte que j'ai recupéré par la sortie retournée par d'une fonction d'un autre module que je n'arrive pas à bien encoder.

En fait, à supposer que j'ai un texte $text dont je ne connais pas forcément l'encodage ... comment "bien procéder" afin de tenir compte des accents lors de l'affichage vers STDOUT ou dans un fichier ...

Encore merci pour votre aide

[estofilo]

En fait, à supposer que j'ai un texte $text dont je ne connais pas forcément l'encodage ... comment "bien procéder" afin de tenir compte des accents lors de l'affichage vers STDOUT ou dans un fichier ...

Peut-être utiliser Encode::Guess() pour trouver l'encodage probable du texte.

[paissad]

bon finalement, je n'ai plus de problème d'encodage, je me suis débrouillé à mettre decode('utf8',$text) le plus souvent possible ....

Merci à tous pour votre aide, résolu