Discussion :

[arm3366]

Bonjour a tous,

j'ai besoin de votre aide, pour parcourir ma liste de fichier et en exlure certain.
Voila ce que j'ai fait, mais ça ne marche, je l'ai pas mis en une seule condition pour voir le probleme mais avec perl -d je trouve d'autres pb comme repertoire d'entree vide, merci pour votre aide concernant la ligne 2

Code :

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

1
2
3
4
5
6
7
8
9
10
foreach my $s_fdat (@{$datdir{$s_project}}){
          if ($s_fdat=~/\./) { next; } elsif($s_fdat=~ /^test/){next;} elsif ( $s_fdat=~ /^demo/) {next;} # exclure les fichiers commançant par tes, par . ou par demo
          #else {
                       open(FHdat, "$s_fdat") or die "Impossible d'ouvrir le fichier $s_fdat";
                       while (my $line = <FHdat>)
                             {
                                ....
                            }
                  }
   }

[arm3366]

le chemin est long mais sùr!!