Thanks all for answering. Book are being read and tutorial done

TJPride, your code works if I change the last two lines

)
for my $V1 (@V){
    if ($V1 eq $V3){
         print "locus_tag $V1 is unique\n";
    }
}
[download]