open (file, ">>myfile.txt");
   print file "$var1==$var2\n";
   close (file);