Front page | perl.perl6.language |
Postings from May 2005
Re: [S29] uniq
Thread Previous
|
Thread Next
From:
Sam Vilain
Date:
May 19, 2005 20:38
Subject:
Re: [S29] uniq
Message ID:
428D5BB0.2050503@vilain.net
Mark Overmeer wrote:
> 'uniq' differs from 'sort' because there is no order relationship between
> the elements. A quick algorithm for finding the unique elements in perl5
> is
> sub uniq(@)
> { my %h = map { ($_ => 1) } @elements;
> keys %h;
> }
...and an even quicker one is:
use Set::Object;
sub uniq(@)
{
set(@_)->members;
}
or
use v6;
use Set;
sub uniq(*@items)
{
set(@items).members;
}
Sam.
Thread Previous
|
Thread Next