Gestion des caractères accentués [PERL] - Perl - Programmation
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);
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...
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.