Skip to main content
1 of 2
Stéphane Chazelas
  • 584.8k
  • 96
  • 1.1k
  • 1.7k

I'd use perl:

perl -MDigest::SHA -le '
  for $f (@ARGV) {
    $d = Digest::SHA->new(256);
    $d->addfile($f);
     push @{$h{$d->digest}}, $f
  }
  print join ", ", @{$h{$_}} for keys %h' -- *.txt
Stéphane Chazelas
  • 584.8k
  • 96
  • 1.1k
  • 1.7k