if ($comptn != $tele) {
   print OUTFILE "TN $comptn not found \n";
}