perl -lane '@F == 2 and $h{$F[0]}+=$F[1]}{print "$_ $h{$_}" for keys %h' yourfile
Чтение: когда в ваших строках ровно 2 поля, обновите хеш-значение, указав, что второе поле для ключа является 1-м ключом. В конце всего этого просто распечатайте ключ и соответствующее значение.
структура данных для хэша% h:
% h = ( ... LARGE => running_sum, ... );
awk '
NF == 2 { seen[$1] += $2 }
END{
for(i in seen)
print i, seen[i]
}
' yourfile