# /usr/bin/

# args are directories
foreach $file (glob(@ARGV)) {
    if (diff 


}