my %filesets;
for ( @fnames ) {
  my $size = -s $_;
  my $csum = `sum "$_"`;
  push @{ $filesets{$size.$csum} }, $_;
}