[PERL] Gestion des caractères accentués

Gestion des caractères accentués [PERL] - Perl - Programmation

Marsh Posté le 06-05-2005 à 23:42:19    

Bonjour !
 
Je travaille sur des scripts Perl dans un environnement Windows XP, avec ActivePerl 5.8.
Je voudrais savoir comment convaincre mes scripts de prendre en compte les caractères accentués ?
Que ce soit dans les pattern de recherche ( m/où/ ) ou dans les print, il refuse désespérément de les gérer, les considérant à priori comme des caractères vides...
 
Si je ne m'abuse, c'est un problème d'encodage, que je pourrais résoudre en expliquant gentiment à Perl d'utiliser la norme Latin-1 ou Latin-9. Oui mais voila... Comment faire ? A quel endroit puis je spécifier ceci ?
 
Merci d'avance pour vos réponses,
 
Nuage.

Reply

Marsh Posté le 06-05-2005 à 23:42:19   

Reply

Marsh Posté le 21-06-2005 à 15:06:00    

#! D:\Perl\bin\wperl.exe
bonjour,
 
J'utilise active perl sous Win XP pour faire des mini programme et chez moi le programme ci-dessous fonctionne tres bien.
Il me detecte correctement le "ù". l'affichage à l'ecran est altéré par la console mais sinon la detection est faite correctement.
 
Exemple:
 
#! D:\Perl\bin\perl.exe
 
use warnings;
use strict;
 
 
my $toto =  "coùcoù";
 
if($toto =~ m/ù/){
print "u accent: 'ù' ok\n"; # Cela s'affiche a la console
}
 
if($toto =~ m/ô/){
print "o accent :'ô' ok\n";
}
 
exit(0);

Reply

Marsh Posté le 21-06-2005 à 15:10:31    

Salut, moi j'utilise juste ceci au début:
 
#!C:\perl\bin\perl.exe -w
 
et ça fonctionne très bien pour les caractères accentués. Par contre, en effet dans la console c'est pas tip top...

Reply

Marsh Posté le 21-06-2005 à 15:33:15    

c'est le terminal de windows qui gere mal les accents

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed