Yves Rutschle a écrit, mercredi 9 avril 2008, à 10:23 :
> On Tue, Apr 08, 2008 at 07:58:20PM +0200, Jacques L'helgoualc'h wrote:
> > { sort -u fic1; sort -u fic2; }|sort|uniq -d
>
> Wow. J'ai une solution en 2 lignes de perl:
>
> my %f1 = map { $_ => 1 } `cat $ARGV[0]`;
> print grep { $f1{$_} } `cat $ARGV[1]`;
>
> mais tu gagnes de loin. Élegant et court :)
Merci, mais j'ai juste élagué la solution de François Tourde ; le triple
awk, analogue à ta solution, évite les tris inutiles.
--
Jacques L'helgoualc'h
--
Lisez la FAQ de la liste avant de poser une question :
http://wiki.debian.org/DebFrFrenchLists
Vous pouvez aussi ajouter le mot ``spam'' dans vos champs "From" et
"Reply-To:"
To UNSUBSCRIBE, email to [EMAIL PROTECTED]
with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED]
