while (my $line1 = <$FILE1>) {
    my $line2 = <$FILE2>;
    print "$line1 missing in file2\n" and last unless defined $line2;
    next if $line1 eq $line2;
    print "Difference found on line $.\n";
    # you may want to exit here, depending on what you need
}