Re: [HS] lignes uniques
Yves Rutschle a écrit, jeudi 25 mars 2004, à 22:34 :
> On Thu, Mar 25, 2004 at 11:19:14PM +0100, Jacques L'helgoualc'h wrote:
[...]
> > M'enfin, c'est tout de même un UUOP !
>
> Ouaip. Je le ferai plus, maintenant que je peux écrire de
> gauche à droite sans :-)
UUOP = Useless Use Of *Perl* ;)
lhh $ time perl -ne 'print if!$l{$_}++' <tmp/bench &>/dev/null
real 0m0.047s
user 0m0.040s
sys 0m0.010s
lhh $ time awk '!l[$0]++' <tmp/bench &>/dev/null
real 0m0.027s
user 0m0.030s
sys 0m0.000s
--
Jacques L'helgoualc'h
Reply to: