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

##</code><code>##

    @test = do { my %s; @s{@test} = @test; values %test };