[PERL]Nombre d'un caractère présent dans une chaine

Bonjour à tous,
Bien qu'ayant lu la faq faite par djibril sur les regexp, je n'arrive pas à utiliser la bonne expression pour compter le nombre de fois qu'un caractère revient dans une chaîne.
Je crois qu'il faut utiliser la mémorisation ???

Merci pour votre aide
Et bon appétit

Fonction rechercher ! C'est dans les snippets du forum : http://developpez.net/forums/viewtopic.php?p=1863701#1863701
(une excellente explication de la méthode) :D

--
Jedaï

Nematoad avait posté une excellente solution dans les Snippets.

[Edit]
Arf, Jedaï trop rapide pour moi ;)
[/Edit]

Oups :oops: , désolé, je n'avais regardé que dans la faq.

Ceci dit, au regard de ce que j'ai lu dans le Snippets (au passage, ça veut dire quoi ??), je pense que j'avais écrit le bon code, qui cependant ne donnait aucun résulat:

le tableau @tab2 contient la ligne:

Code:

---

1 2	C;3020170263002;E;3012992500748;B;3012992500250;M;8711951904232;L;5022629012067;C;5414628002066

---

Je voulais compter le nombre de C, or je comptais le nombre de c :oops: :oops:

Code:

---

1 2 3 4 5 6 7 8 9

foreach(@tab2) { while($_=~ /C/g) { $c++; } } print "\nC: $c\n";

---

Maintenant ça marche...

Merci !!