Petite question alakon et qui n'a d'intérêt que ma culture personnelle:
Est-il possible en perl de faire un replace dans une chaine de caractères sans modifier la-dite chaine?
Exemple: j'ai deux variables ($a='toto', $b='tata' ) et je veux mettre dans un troisieme variable ($c) la concatenation de $a et du remplacement de tous les 't' de $b en 'p', tout ça s'en modifier $b et en une seule ligne.
J'ai bien trouvé une façon, mais je trouve ça un goret:
Code :
- my $a='toto';
- my $b='tata';
- my $c = $a.(($_=$b)=~s/t/p/g?$_:$_);
|
et ce qui revient de toute façon à créer une recopie de b.
Y'a-t-il un moyen "plus propre"...