Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
1551 connectés 

  FORUM HardWare.fr
  Programmation
  Perl

  Faire un "cherche et remplace" dans un fichier en Perl ?

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

Faire un "cherche et remplace" dans un fichier en Perl ?

n°1584351
NickS2000
Posté le 10-07-2007 à 09:03:16  profilanswer
 

Bonjour,
 
Je cherche un moyen de faire un "cherche et remplace" dans un fichier mais seulement jusqu'a un certain endroit du fichier.
 
Exemple, on remplace toto par titi jusqu'a =C01
toto
toto
toto
=C01
toto
toto
 
Après remplacement:
titi
titi
titi
=C01
toto
toto
 
Quelqu'un aurait un idée ?
 
Merci d'avance.
 

mood
Publicité
Posté le 10-07-2007 à 09:03:16  profilanswer
 

n°1584354
anapajari
s/travail/glanding on hfr/gs;
Posté le 10-07-2007 à 09:13:03  profilanswer
 

Si ton fichier est pas trop gros:
- tu balourdes tout le contenu de ton fichier dans une variable
- tu lis ligne par ligne
- tu t'arrètes si tu trouves ton motif de fin
-  sinon tu fais ton remplacement
Et tu printes tout ça dans le fichier originel.
 
Et si le fichier est gros et bien tu fais pareil mais ligne par ligne pour la lecture du fichier et tu passes par un fichier temp pour la nouvelle version.

n°1584371
NickS2000
Posté le 10-07-2007 à 09:27:21  profilanswer
 

Citation :

- tu t'arrètes si tu trouves ton motif de fin


 
OK Merci mais tu connais la commande perl pour faire ça ? (oui, je sais je suis nul, d'habitude je fais du shell)

n°1584375
anapajari
s/travail/glanding on hfr/gs;
Posté le 10-07-2007 à 09:28:27  profilanswer
 

Dans ta boucle:

Code :
  1. last if /uneRegexPourMatcherTonMotif/;


Message édité par anapajari le 10-07-2007 à 09:28:47
n°1584390
NickS2000
Posté le 10-07-2007 à 09:56:08  profilanswer
 

OK c'est parfait.
 
Merci beaucoup

n°1584513
matafan
Posté le 10-07-2007 à 13:02:04  profilanswer
 

perl -i -pe '(1../^=C01/)&&s/toto/titi/g'


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  Perl

  Faire un "cherche et remplace" dans un fichier en Perl ?

 

Sujets relatifs
Paramètre "host" dans fichier configuration.php ?[résolu] suppression d'une ligne dans un fichier txt
droit à un fichierImpossible d'écrire un fichier texte dans un répertoire sur FTP.
SQL Server : fichier logUn programmeur se cherche un projet ?
[Résolu] Importer un fichier .xsl dans une BDD[SQL Server][Gestion de fichier] Ouvrir lire créer un fichier via SQL?
Scritp FTP qui lit un fichier .comment lire un fichier sol
Plus de sujets relatifs à : Faire un "cherche et remplace" dans un fichier en Perl ?


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR