{ local $/ = '\0'; $line = `diff $args $file1 $file2`; print $line; }