system("diff -q \"$File::Find::name\" \"$other_file\" > NU
+L");
if($?) {
    print "$file is different\n";
}

##</code><code>##

if(qx/diff -q "$File::Find::name" "$other_file"/) {
    print "$file is different\n";
}