Jeff Pang schreef:

> [un-double]
> @test = grep { ++$hash{$_} < 2 } @test;


Alternative:

  @test = grep { !$hash{$_}++ } @test;

-- 
Affijn, Ruud

"Gewoon is een tijger."

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/


Reply via email to