open(FILE111,"vv.txt") or die $!;
my @file111=<FILE111>;
close FILE111;
push(my @unique,grep {!$ss{$_}++} @file111);
foreach $i(0 .. (scalar @unique - 1)){
$nc="nc".($i + 1);
print "$nc = $unique[$i]\n";
}