Discussion :

[martijan]

bonjour,

étant nouvel utilisateur de PERL je me suis munit d'un bouquin. La 3e édition d'O'REILLY.
en fait j'ai un petit prob avec les substitutions et dans ce bouquin il manque des subtilités du genre :

si je veux supprimer un caractère uniques dans une chaine.
Par exemple :

$chaine="azertaayuuio";

donc je veux supprimer la "a" unique et non le "aa" !!!!

comment faire ?

d'avance merci.

[nyal]

Voici comment faire ;

Code :

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

1
2
3
4
5
 
while (<>) {
    s/a/z/;
    print ;
}

Remplace le premier 'a' par un 'z'.

Et pour remplacer tout les 'a' il suffit de rajouter l'option 'g' :

Code :

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

1
2
3
4
5
 
while (<>) {
    s/a/z/g;
    print ;
}

[Jedai]

Et si tu ne veux remplacer que les "a"s isolés, tu peux utiliser :

Code :

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

1
2
 
s/(?<!a)a(?!a)//g;

[martijan]

OK, merci à vous