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

  FORUM HardWare.fr
  Programmation
  Perl

  fichier en lecture/ecriture

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

fichier en lecture/ecriture

n°1014463
pretorienx
Posté le 16-03-2005 à 13:29:21  profilanswer
 

j'ai un peiti pb avce le code suivant:
 

Code :
  1. $fichier = "H:\\test.txt";
  2. open(F,"+<$fichier" ) || die("Erreur de lecture de $fichier, Erreur: $!\n" );
  3. while($ligne=<F> ){
  4.         print "ligne\n";
  5.         $ligne=~s/t/p/g;
  6.         print "ligne\n";
  7. }#fin while


 
mon fichier test.txt ne se met pas à jour . Théoriquement le pgr remplace les t par des p les print sont ok
mais le fichier ne se met pas à jour alors qu'il est en lecture/ecriture
 
merci pour un petit coup de pouce

mood
Publicité
Posté le 16-03-2005 à 13:29:21  profilanswer
 

n°1014478
couak
Posté le 16-03-2005 à 13:39:30  profilanswer
 

lorsque tu utilises un "<" dans la fonction open() tu ouvres le fichier en lecture
il faut utiliser un ">" pour l'ouvrir en écriture
le mieux est de remplacer le fichier par un autre fichier (tu te feras moins cher avec les boucles bizarres)
 

Code :
  1. $fichier_in = "H:\\test.txt";
  2. $fichier_out = "H:\\test2.txt";
  3. open (FILE_IN, "$fichier" ) || die "Erreur de lecture de $fichier, error_msg = $!\n" );
  4. my @all_lines = <FILE_IN>;
  5. close FILE_IN;
  6. open (FILE_OUT, ">$fichier_out" );
  7. foreach $item (@all_lines)
  8. {
  9.    $item =~ s/t/p/g;
  10.    print FILE_OUT $item;
  11. }
  12. close FILE_OUT;


Code à tester...


Message édité par couak le 16-03-2005 à 13:39:45
n°1014543
pretorienx
Posté le 16-03-2005 à 14:38:24  profilanswer
 

couak a écrit :

lorsque tu utilises un "<" dans la fonction open() tu ouvres le fichier en lecture
il faut utiliser un ">" pour l'ouvrir en écriture
le mieux est de remplacer le fichier par un autre fichier (tu te feras moins cher avec les boucles bizarres)
 

Code :
  1. $fichier_in = "H:\\test.txt";
  2. $fichier_out = "H:\\test2.txt";
  3. open (FILE_IN, "$fichier" ) || die "Erreur de lecture de $fichier, error_msg = $!\n" );
  4. my @all_lines = <FILE_IN>;
  5. close FILE_IN;
  6. open (FILE_OUT, ">$fichier_out" );
  7. foreach $item (@all_lines)
  8. {
  9.    $item =~ s/t/p/g;
  10.    print FILE_OUT $item;
  11. }
  12. close FILE_OUT;


Code à tester...


 
 
 
 
merci bcp !!!


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

  fichier en lecture/ecriture

 

Sujets relatifs
ouvrir un fichier excel en lecture/écritureProblème de noob ecriture/lecture fichier texte
Ecriture/Lecture de fichier binaire (ios::binary) avec << et >>[Perl] lecture/écriture d'un fichier
Lecture / Ecriture fichier texteEcriture de String ds un fichier, puis lecture et affichage ds une fen
APPLET + acces LECTURE ECRITURE d un fichier commun[c++] ecriture / lecture dans un fichier
[C++]Lecture/ecriture dans un fichier[C++] Ecriture et lecture de bits dans un fichier
Plus de sujets relatifs à : fichier en lecture/ecriture


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