A voir également:
- Perl : fonction de suppression
- Forcer suppression fichier - Guide
- Suppression compte instagram - Guide
- Fonction si et - Guide
- Suppression page word - Guide
- Suppression compte facebook - Guide
2 réponses
Merci beaucoup pour ton truc du genre, ca fonctionne bien de cette facon.enfin presque, juste un bidouillage de ma part pour integrer ca dans un fichier et faire en sorte que le resultat ne s'affiche pas sous le shell (j'utilise Unix) et pas en une seule ligne.
Mes (petis) changement pour ceux que ca interesse sont:
open(f,"tot.txt");
open(f1,">>res.txt");
while(<f>){
s/[^0-9]//g;
print f1; print "\n";
}
close f1; close f;
Encore merci a toi Damien
Mes (petis) changement pour ceux que ca interesse sont:
open(f,"tot.txt");
open(f1,">>res.txt");
while(<f>){
s/[^0-9]//g;
print f1; print "\n";
}
close f1; close f;
Encore merci a toi Damien