Hi,

open(OUT, ">new.txt")||die("cannot create\n");

print OUT "\nExtra Text present in the second File\n", $lcma->get_comp
+lement ,"\n";
print OUT "\nExtra Text present in the First File\n", $lcma->get_uniqu
+e ,"\n";
[download]

You just replace the last two line of my code with the above code.

Regards,
Velusamy R.