perl -MDigest::MD5=md5 
-000le" print for grep{ ++$h{ md5( do{ local @ARGV = $_;<> } ) } > 1 } 
map{ glob} @ARGV" *