Perl code to print out differences between 2 files

The following perl code was written to find the differences between 2 files and to print it out. It will print out lines that are in first file but not in second.