$compare = `diff $file1 $file2 2>&1`;
$comapre =~ s/^\n$//;
if ($compare ne "") { #fail ... }