Select Code to Download

$a = "/path/to/a/file";
$b = "/path/to/b/file";
$difference = system("$diff $a $b");
$difference2 = system("$diff -y $a $b");

if ($difference eq ''){
$difference = "Exactly Same.\n";
...
push @table1, "<table id =\"Table1\">";
push @table1, "<tr><th>path A</th><th>A</th><th>path B</th><th>B</th><
+/tr>";
push @table1, "<tr><td colspan =\"4\">$difference</td></tr>";