Have you looked into Text::Diff?

Adapted from the documentation sample:

use strict;
use warnings;

use Text::Diff;
my $diff = diff "file1.txt", "file2.txt", { STYLE => "Context" };

print "$diff\n";
[download]