Bonjour,
je cherche à supprimer la 1ère ligne de plusieurs fichiers txt !
voici mon programme test qui marche bien pour un fichier déterminé : "test.txt"
j'aimerais pouvoir utiliser mon programme pour plusieurs fichiers à la fois c'est à dire qu'au lieu de lancer le script n fois pour les n fichiers je voudrais pouvoir taper un commande du style test.pl * qui me permettrait de traiter tous les fichiers de mon répertoire. Les fichiers de sorties doivent avoir le même nom que les fichiers d'entrée
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18 #!/usr/bin/perl -w open(FILE, "< test.txt" ) or die ("prob a l'ouverture du fichier" ); @save = <FILE>; close(FILE); foreach (@save) { $_ = "" if ($_ =~ m/AMR/); chomp $_; } open(FILE, ">test.txt" ) or die ("prob a l'ouverture du fichier" ); foreach (@save) { print FILE $_."\n" if ($_); } close(FILE);
Si vous pouviez me donner un coup de main ce serait sympa
merci BEAUCOUP
Partager