Discussion :

[telecnop]

Hello

J'ai la chaine de caractère suivante :

Code :

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

1
2
 
$_ = "%user%,%password%,%time%";

J'aimerais remplacer chacun des mots clés compris entre les % par une autre.

ex, la chaine de sortie doit être

Code :

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

1
2
 
$ = "toto,toto,toto";

j'ai essayé la substitution suivante :

Code :

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

1
2
 
s/%(.*)%/toto/g;

Malheureusement $1 (le contenu de (.*)) contient ceci :
user%,%password%,%time
c'est à dire, le contenu entre le tout premier % et le tout dernier %

Merci

[nyal]

Bnjour,

Voici comment faire :

Code :

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

1
2
 
s/%(.*?)%/toto/g;

Simplement tu n'auras pas toutes les chaines dans les variables $1, $2.
POur cela, il faudrait changer le systeme. utiliser un split par exemple.

[telecnop]

Merci beaucoup..

A la place des $1, $2, $3, on obtient quoi ?
A chaque fois $1 apparemment ?

Enfin, ca va faire l'affaire, merci encore..

[Jedai]

Si tu veux avoir les trois mots qui seront remplacés, tu as deux possibilités :

Code :

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

1
2
3
4
5
6
7
 
$_ = "%user%,%password%,%time%"; 
 
my @rec = ();
while( s/\G[^%]*%(.*?)%/toto/ ){
    push @rec, $1;
}

ou :

Code :

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

1
2
3
4
5
 
$_ = "%user%,%password%,%time%"; 
 
my @rec = m/%(.*?)%/g;
s/%(.*?)%/toto/g;

TIMTOWDI

[telecnop]

merci..