use Text::Unidecode;
my $ttt = "\x{6edd}";
my $ttt2 = "6edd";
print unidecode("$ttt"); #marche et affiche "Long" (truc en chinois)
print unidecode("$ttt2"); #marche pas et affiche 6edd
en moi je recupere la variable my $ttt2 = "6edd";
ma question est:
y a t-il une fonction avec laquelle je puisse faire:
my $ttt2 = func("6edd");
print unidecode("$ttt2"); #marche et affiche Long
en gros je veux transformer une chaine contenant "6edd" en "\x{6edd}"
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Stéphane Goujet
Le 1/07/2004, maxime a supposé :
y a t-il une fonction avec laquelle je puisse faire: my $ttt2 = func("6edd"); print unidecode("$ttt2"); #marche et affiche Long en gros je veux transformer une chaine contenant "6edd" en "x{6edd}"
$ttt2=pack("U", hex("6edd"));
A+, Stéphane.
-- Ceci est une signature automatique de MesNews. Site : http://mesnews.no-ip.com
Le 1/07/2004, maxime a supposé :
y a t-il une fonction avec laquelle je puisse faire:
my $ttt2 = func("6edd");
print unidecode("$ttt2"); #marche et affiche Long
en gros je veux transformer une chaine contenant "6edd" en "x{6edd}"
$ttt2=pack("U", hex("6edd"));
A+,
Stéphane.
--
Ceci est une signature automatique de MesNews.
Site : http://mesnews.no-ip.com
y a t-il une fonction avec laquelle je puisse faire: my $ttt2 = func("6edd"); print unidecode("$ttt2"); #marche et affiche Long en gros je veux transformer une chaine contenant "6edd" en "x{6edd}"
$ttt2=pack("U", hex("6edd"));
A+, Stéphane.
-- Ceci est une signature automatique de MesNews. Site : http://mesnews.no-ip.com
jeanpierre.vidal
(maxime) wrote in message news:...
Bonjour, j'ai un probleme avec ce code:
use Text::Unidecode; my $ttt = "x{6edd}"; my $ttt2 = "6edd";
print unidecode("$ttt"); #marche et affiche "Long" (truc en chinois) print unidecode("$ttt2"); #marche pas et affiche 6edd
en moi je recupere la variable my $ttt2 = "6edd";
ma question est: y a t-il une fonction avec laquelle je puisse faire: my $ttt2 = func("6edd"); print unidecode("$ttt2"); #marche et affiche Long en gros je veux transformer une chaine contenant "6edd" en "x{6edd}"
tout simplement $ttt = 'x{' . $ttt2 . '}'; ?
tout solution est la bienvenue Merci d'avance
maxime_phan@hotmail.com (maxime) wrote in message news:<4cc9a89e.0407010701.678825fc@posting.google.com>...
Bonjour,
j'ai un probleme avec ce code:
use Text::Unidecode;
my $ttt = "x{6edd}";
my $ttt2 = "6edd";
print unidecode("$ttt"); #marche et affiche "Long" (truc en chinois)
print unidecode("$ttt2"); #marche pas et affiche 6edd
en moi je recupere la variable my $ttt2 = "6edd";
ma question est:
y a t-il une fonction avec laquelle je puisse faire:
my $ttt2 = func("6edd");
print unidecode("$ttt2"); #marche et affiche Long
en gros je veux transformer une chaine contenant "6edd" en "x{6edd}"
use Text::Unidecode; my $ttt = "x{6edd}"; my $ttt2 = "6edd";
print unidecode("$ttt"); #marche et affiche "Long" (truc en chinois) print unidecode("$ttt2"); #marche pas et affiche 6edd
en moi je recupere la variable my $ttt2 = "6edd";
ma question est: y a t-il une fonction avec laquelle je puisse faire: my $ttt2 = func("6edd"); print unidecode("$ttt2"); #marche et affiche Long en gros je veux transformer une chaine contenant "6edd" en "x{6edd}"
