push(@newunique,grep {!$ss{$_}++} @unique);