[kw-pm] unique

Dave Carr dc0955 at gates.com
Wed Apr 19 10:48:28 PDT 2006


Hmmm...how about

 

%seen = ();

@uniq = grep(++$seen{$_} == 2, @items);

-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://mail.pm.org/pipermail/kw-pm/attachments/20060419/c14e1719/attachment.html 


More information about the kw-pm mailing list