Fácil no Perl: use um hash para armazenar as somas em execução.
perl -laF/,/ -ne '
$h{ $F[0] } += $F[1];
}{
print "$_,$h{$_}" for keys %h;
' input-file > output-file
-
-nlê a linha de entrada por linha -
-ladiciona novas linhas aprint -
-adivide cada linha de entrada no array @F -
-F/,/diz-apara dividir em vírgulas -
}{é o operador "Saudação Eskimo", separa o loop-ndo código que será executado no final da entrada.