Discussion :

[devabel]

Bonsoir,
Je suis un débutant en perl et je cherche à faire une recherche dans une chaine de caracteres et trouver l'occurence exacte :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
$chaine = "ABC DEF GHI JKL";
$mot = "DE";
if($chaine =~ /^$mot/) {
  print "$mot trouve\n";
}

Le probleme avec ça, c que je trouve cette occurence alors je ne veux trouver que les occurences exactes.

Pouriez vous m'aider pour cette solution?
merci

[iblis]

Qu'appelles-tu une occurrence exacte ?

Tu peux utiliser \b pour matcher la limite d'un mot, si c'est ce que tu veux.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

if ( $chaine =~ m/\b$mot\b/ ) {