while(<F1>)
{
   #some conversions here
   if($_ =~ /<EMP>/g)
   {
      print F2 $_;
   }
}