On Thu, Mar 25, 2004 at 09:36:52PM +0100, Jacques L'helgoualc'h wrote:
> > cat in | perl -ne 'print if! $l{$_}; $l{$_}=1;' > out
> UUOC :)

En effet; mais comme j'�cris et je lis de gauche � droite,
j'ai tendance � penser que d'autres font �a aussi et que �a
peut paraitre plus clair � la premi�re lecture.

Par contre, ton AWK inspire une optimisation qui m'avait
�chapp�e:

perl -ne 'print if!$l{$_}++;' < in > out

Y.

Répondre à