> >de meme on filtrera ton 2eme fichier presque de la meme manière > > > >map {print if $found_email{ (split /;/)[3] } <$new>; > > Effectivement, c'est bien plus simple ainsi. Malheureusement, je n'y > connais rien en perl... J'ai juste mis une négation (not)= après le > dernier if afin de garder que les lignes différentes.
c'est donc map {print if not $found_email{ (split /;/)[3] } <$new>; > Mais quoique je fasse, la sortie inclut toute de même les lignes > faisait suite à un retour chariot... Solution temporaire : supprimer > la colonne Adresse avec un tableur et passer le script. oula ... je suis largé aussi ... marc