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

  FORUM HardWare.fr
  Programmation
  Perl

  [Perl] lecture/écriture d'un fichier

 



 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

[Perl] lecture/écriture d'un fichier

n°450035
scOulOu
Born Under Saturn
Posté le 07-07-2003 à 11:35:52  profilanswer
 

Voilà je voudrais parcourir un fichier en lecture/écriture, pr pouvoir modifier une ligne si besoin est. J'ai fait ça, mais ça marche pas :

Code :
  1. my $is_id;
  2. open(NEXT_TARGET, '+<'.'mon_fichier');
  3. while(<NEXT_TARGET> ) {
  4.     if (/^$param_to/) {
  5.         $is_id = "true";
  6.         print NEXT_TARGET "Quelque chose"."\n";
  7.         last();
  8.     }
  9. }
  10. close(NEXT_TARGET);
  11. if (!$is_id) {
  12.     open(NEXT_TARGET, '>>'.'mon_fichier');
  13.     print NEXT_TARGET "Quelque chose"."\n";
  14.     close(NEXT_TARGET);
  15. }


Mon deuxièmre if marche quand il faut, ce qui prouve qu'il rentre bien dans le premier. Mais malgré tout, il se refuse à écrire ds le fichier pdt qu'il le lit. Comment faut s'y prendre ?

mood
Publicité
Posté le 07-07-2003 à 11:35:52  profilanswer
 

n°450044
burgergold
5$? va chez l'diable!
Posté le 07-07-2003 à 11:53:39  profilanswer
 

le mieux selon moi c d'ouvrir le fichier, le balancer dans un array, fermer le fichier, le réouvrir en écriture avec >, parcourir le array et réécrire le fichier


---------------
http://www.boincstats.com/signature/user_664861.gif
n°450046
scOulOu
Born Under Saturn
Posté le 07-07-2003 à 11:58:40  profilanswer
 

burgergold a écrit :

le mieux selon moi c d'ouvrir le fichier, le balancer dans un array, fermer le fichier, le réouvrir en écriture avec >, parcourir le array et réécrire le fichier


Ouais, je v p-e finir par en arriver là, effectivt :jap:  
Mais ça fait chier de pas être foutu d'utiliser le +< :/

n°450928
Aricoh
gentil mais fo po pousser
Posté le 08-07-2003 à 11:38:41  profilanswer
 

pas mieux que Burgergold, je procède comme lui avec des fichiers pas trop gros.
 
pour les gros fichiers :
 
- copie du fichier d'origine par sécurité
- ouverture du fichier sauvegardé en lecture seule
- création d'un second fichier
- pour chaque ligne, je fais les modifs si besoin et quoiqu'il arrive, j'écris la ligne dans le new fichier


---------------
j'suis l'Duc des 7 Enfers Éternels ...

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

  [Perl] lecture/écriture d'un fichier

 

Sujets relatifs
[OPENGL] Créer un fichier .raw [RESOLU][c] perl embed sous linux
[PHP] Mettre un argument à un fichier en "include"[Perl] Effacer éléments du tableau
modifier la premier ligne d'un fichier txt en ASPchanger l'attribut taille d'un fichier ???
[applet]lire un fichier coté serveur [resolu][PHP] lecture d'un fichier
[PHP] Vérifier l'existence d'un fichier 
Plus de sujets relatifs à : [Perl] lecture/écriture d'un fichier


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