on Fri, 30 Aug 2002 17:32:36 GMT, [EMAIL PROTECTED] (Sudarshan
Raghavan) wrote: 

> Why do you need to do a pattern match anyways? Just a
> @unique = grep{!$seen{$_}} @all_elements;
> should do

You forgot to increment. The correct way is:

    @unique = grep{!$seen{$_}++} @all_elements;

-- 
felix


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to