while(<IN2>) {
    chomp;
    print "$_ is a new site\n" unless exists $newsite1{$_};
  } # while