Bonjour à tous ,
voila je veux comparer entre deux chaine de caractère en perl , j'ai fait le code suivantMalheureusement pas de resultt comme si le programme ne connait pas l'operateur eq
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12 $huit_suff = substr($mot, $long-9, 8); for ($i = 0; $i < $size_tableau; $i++) { $suff=@tableau[$i]; if($suff eq $huit_suff) { push @tab_suffixe, $huit_suff unless grep { /$huit_suff/ } @tab_suffixe; }
merci de m'aider
Partager