le 15/08/2006 à 15:12, Yves Martin a écrit dans le message :
J'aimerai compter le nombre d'occurences de chaque caractère dans une chaîne. Avec un résultat sous forme de map (lettre -> compteur).
$count{$1}++ while ($str =~ /(.)/g);
Tu peux remplacer (.) par (w) si tu ne veux que les lettres.
-- Benoit Izac
nicolas
Yves Martin wrote:
J'aimerai compter le nombre d'occurences de chaque caractère dans une chaîne. Avec un résultat sous forme de map (lettre -> compteur).
Existe-t-il une fonction ou un package pour faire ça sans ré-inventer la roue ?
Méfie-toi de pièges comme compter certains caractères utf-8 deux fois au lieu d'une. Si ton code est en l'ASCII ou en Latin-*, pas de problème.
nicolas patrois : pts noir asocial -- IDÉALISTE
M : Si je savais parler tout serait différent... Je pourrais dire ce que je pense, changer le monde ! P : C'est ça... au lieu de donner la patte pour réclamer ta pâtée, tu dirais "s'il vous plaît"...
Yves Martin wrote:
J'aimerai compter le nombre d'occurences de chaque caractère dans une
chaîne. Avec un résultat sous forme de map (lettre -> compteur).
Existe-t-il une fonction ou un package pour faire ça sans ré-inventer
la roue ?
Méfie-toi de pièges comme compter certains caractères utf-8 deux fois au
lieu d'une.
Si ton code est en l'ASCII ou en Latin-*, pas de problème.
nicolas patrois : pts noir asocial
--
IDÉALISTE
M : Si je savais parler tout serait différent... Je pourrais dire ce que
je pense, changer le monde !
P : C'est ça... au lieu de donner la patte pour réclamer ta pâtée, tu
dirais "s'il vous plaît"...
J'aimerai compter le nombre d'occurences de chaque caractère dans une chaîne. Avec un résultat sous forme de map (lettre -> compteur).
Existe-t-il une fonction ou un package pour faire ça sans ré-inventer la roue ?
Méfie-toi de pièges comme compter certains caractères utf-8 deux fois au lieu d'une. Si ton code est en l'ASCII ou en Latin-*, pas de problème.
nicolas patrois : pts noir asocial -- IDÉALISTE
M : Si je savais parler tout serait différent... Je pourrais dire ce que je pense, changer le monde ! P : C'est ça... au lieu de donner la patte pour réclamer ta pâtée, tu dirais "s'il vous plaît"...
Yves Martin
On Tue, 2006-08-15 at 15:56 +0200, Benoit Izac wrote:
$count{$1}++ while ($str =~ /(.)/g);
Merci c'est parfait. -- Yves Martin
On Tue, 2006-08-15 at 15:56 +0200, Benoit Izac wrote: