@test = do { my %s; grep { !$s{$_}++ } @test };