I don't have a mac so I can't test this, but I assume the mac has a "sort" app somewhat like the *nix app (try "which sort" at a command line, and then "man sort"),
then my guess is something like this:
#!/usr/bin/perl
use strict; # https://perlmonks.org/?node_id=11147822
use warnings;
my @files = map "/tmp/11147822.$_.txt", 1 .. 100; # FIXME
my $outpath = "/tmp/11147822.outpath"; # FIXME
open my $fh, '-|', "sort @files" or die;
open my $tosort, '|-', "sort -n -k2 >$outpath" or die;
<$fh> =~ /^(\w+)\s+(\d+)/ or die;
my ($name, $value) = ($1, $2);
while( <$fh> )
{
if( /^(\w+)\s+(\d+)/ )
{
if( $1 eq $name ) { $value += $2; }
else
{
print $tosort "$name\t$value\n";
($name, $value) = ($1, $2);
}
}
}
print $tosort "$name\t$value\n"; # be sure to print last one
close $tosort or die;
Assuming mac's are sort of built on BSD and still have a command line and have a more or less "sort" app.