Discussion :

[jamsgoodon]

Bonjour le forum.

Est ce que quelqu'un saurai comment faire pour dire dans le script " traiter un dossier fichier par fichier."
En fait j'ai 25 fichiers sur lesquels il me faut appliquer le même script.
Et je trouve archaïque de copier coller 25 fois mon script et de changer les chemin d'accès de fichier IN.

Merci de m'aider je pense que c'est possible!

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
my $data = ' ';
my $file = ' ';
 
 
open(FILE,$data.'/'.$file)  #puis passe à un autre fichier jusqu'à ce que tous les fichiers du dossier soient traités.

[stoyak]

une petite suggestion ....
Tu mets tous tes fichiers dans un tableau, et tu fais un foreach sur ton tableau

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
 
my @allfiles = ($file1,$file2,$file3);
 
foreach my $file ( @allfiles ) {
     # traitement de chacun de tes fichiers
     open(FILE,'<',$file) || die "Unable to open $file\n";
     # .../...
     close(FILE);
}