Discussion :

[donny]

salut,

J'ai un fichier qui se presente ainsi

$var1 = 1001
$var2=c:
$var3=HOME

ce que je souhaite; c'est pouvoir modifier la valeur de la variable $var1;
je voudrais faire un script qui ouvre se fichier, trouve la variable $var1 et modifie sa valeur;
Pour le moment mon script ouvre le fichier et trouve $var1 mais je ne vois pas comment remplacer $var1 par sa nouvelle valeur;
en gros une fois que je trouve la ligne $var1 = 1001 , je voudrais la remplacer par une nouvelle ligne $var1 = 1632.


Merci de votre aide

[Jedai]

Tu utilises une substitution :

Code :

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

s/^(\$var1 *= *).*$/${1}1632/m

--
Jedaï

[Jasmine80]

Je ne pense pas qu'il y ait moyen de modifier un fichier en Perl.
Je sais que cela ne répond pas à ta question, mais peut-être peux-tu à défaut de trouver mieux recopier ton fichier ligne par ligne dans un nouveau fichier en y modifiant ce que tu veux. Ensuite, tu effaces ton ancien fichier.

Code :

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

1
2
3
4
5
6
7
8
9
if($Ligne=~ m/\$var1 = 1001/)
{
        $Ligne =~ s/1001/1632/;
        print $Outfile $Ligne."\n";
}
else
{
        print $Outfile $Ligne."\n";
}

Jasmine,

[Jasmine80]

Oui mais la substitution changera la valeur de $var1 dans le script mais pas dans le fichier lu.
Quand tu dis

je voudrais la remplacer par une nouvelle ligne $var1 = 1632

Est-ce bien dans le fichier que tu as lu?


Jasmine,

[Arioch]

Est-ce bien dans le fichier que tu as lu?

Jasmine,

Oui, c'est ce qu'il veut : pouvoir modifier son fichier d'entrée avec la nouvelle valeur.

[Jedai]

Peut-être devrais-je mettre mon post récent sur le sujet en haut du forum, non ? La question revient très fréquemment, il pourrait être utile d'avoir une référence à pointer.

--
Jedaï

[Jasmine80]

Oui en effet Jedaï, ça serait une très bonne idée.


Jasmine,

[Arioch]

Peut-être devrais-je mettre mon post récent sur le sujet en haut du forum, non ? La question revient très fréquemment, il pourrait être utile d'avoir une référence à pointer.

--
Jedaï

Je te suggère davantage de reprendre ton excellente explication en y ajoutant un exemple.

[donny]

merci de vos reponses
en faite
j ai reussi
je recupere le fichier dans un tableau
et je le reecri ensuite avec la nouvelle valeur