Bonjour,

J'ai un fichier1 ou il y'a :

a[0] a
b[0] b
c[1] c

et uun fichier2 ou il y'a :
a[0] a
b[0] b
d[2] e

je veux comparer ces deux fichiers, si chaque élement est dans l'autre, j'ai fait alors comme ceci ( ce qu'il ya de plus simple) :

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
19
 
      open(A, "a.txt") or die("pb lecture fichier1 : $!\n");
      @a = <A>;
      chomp(@a);
      close(A);
 
      open(B, "b.txt") or die("pb lecture fichier2 : $!\n");
      @b = <B>;
      chomp(@b);
      close(B);
 
  foreach $k (@a) {
         if ( !( grep(/$k/, @b) ) ) {
          print "erreur pour $k\n";
  	}
    else {
    print "not erreur pr $k\n";
    }
      }
Et ça me donne tout faux, je ne comprends pas d'ou lerreur ...Voulez vous bien m'aider, merci d'avance.