my %seen;
my %total;

foreach my $path (@ARGV) {
  process($path, %seen, %total);
}