Sinon il y a toujours la solution perl#!/usr/bin/perl -w use strict; my ($file1,$file2) = @ARGV; my $ligne; open(FILE1,"$file1"); foreach(<FILE1>){ $ligne = $_; open(FILE2,"$file2"); foreach(<FILE2>){ if($ligne eq $_){ print; } } close (FILE2); } close(FILE1);
François TOURDE a écrit :
Le 13977ième jour après Epoch, Tahar écrivait:J'ai pensé à diff, mais ça ne me donne pas le résultat que je voudrais avoir en sortie, car je veux uniquement la liste des éléments présents dans les deux fichiers uniquementDans ce cas, un truc du genre: cat <(sort f1|uniq) <(sort f2|uniq)|sort|uniq -c|grep -v "^ *1 *"|sed -e 's/ *[0-9]\+ *//'
-- Le progrès technique est comme une hache qu'on aurait mis dans les mains d'un psychopathe (Albert Einstein) --Si vous ne pouvez expliquer un concept à un enfant de six ans, c'est que vous ne le comprenez pas complètement.
(Albert Einstein)