🚀 go-pugleaf

Cyril Gallut writes:

  Je cross-poste vers fcl.perl.  Je ne fixe cependant pas de
suivi (d�sol� pour les deux essais, sur fct.xml).

> Lorsque je change l'encodage d'un document dont les donn�es sont en utf8 
> j'obtiens une sortie en latin1. Voir code et sortie plus bas. J'ai la 
> m�me chose si j'utilise createDocument avec "UTF8".
> Quelle est la raison de ce comportement ?

> #!/usr/bin/perl
> use strict;
> use XML::LibXML;

> my $string = "� � � �";
> print "En utf8: $string\n";

> # Create a XML document
> my $doc = XML::LibXML::Document->createDocument( "1.0" );
> my $root = $doc->createElement( "Racine" );
> $doc->setDocumentElement( $root );
> my $child;
> $root->appendChild( $child = $doc->createElement( "Fils" ) );
> $child->setAttribute( "Value", $string );

> #Output before changing encoding
> print $doc->toString( 1 );

> print "enc : " . $doc->encoding . "\n";
> $doc->setEncoding( "UTF8" );
> print "enc : " . $doc->encoding . "\n";
> print $doc->toString( 1 );

> Sortie (term en latin1) :
> gallut% perl test.pl
> En utf8: �  ö ü î
> <?xml version="1.0"?>
> <Racine>
>   <Fils Value="&#xE0; &#xF6; &#xFC; &#xEE;"></Fils>
> </Racine>
> enc :
> enc : UTF8
> <?xml version="1.0" encoding="UTF8"?>
> <Racine>
>   <Fils Value="� � � �">� � � �</Fils>
> </Racine>

  Le second �l�ment 'Fils' n'est vraiment pas normal.  Il a la
cha�ne comme contenu et comme valeur de l'attribut 'Value'.  Sans
doute une erreur de copier/coller.

  Pour ce qui est du probl�me d'encodage, �a ne me semble pas
normal qu'un outil sorte un document sp�cifiant encoding="UTF8"
et des caract�res de codes Latin-1.  Es-tu certain que les
caract�res sont r�ellement de code erron�s (par exemple en
utilisant 'hexdump(1)') ?

  Si c'est le cas, c'est un bug de 'XML::LibXML', et ceux de
fcl.perl devraient �tre d'une plus grande aide.

--drkm