Еще одна awk-версия:
awk '/NO.*[[:blank:]]LB/,/INTERNAL COORDINATES/ {
if($1~/[0-9]/){count[$2]++;}}
END {for(i in count){printf "%s%s",i,count[i]}print ""} ' file
Это своего рода смесь между ответом Серга и Хаосом. Он будет работать только между строками, соответствующими NO.*[[:blank:]]LB и INTERNAL COORDINATES. Массив count учитывает только строки, первое поле которых является числом.
Если ваш файл точно так же, как вы показываете, где последовательные блоки данных разделены пустой строкой, вы можете использовать режим абзаца Perl, который обрабатывает абзацы как строки: [ ! d3]
perl -00ne 'next unless /CARTESIAN COORDINATES \(A\.U\.\)/;
$count{$_}++ for (/\s+\d+\s+(\w+)\s/g);
print "$_$count{$_}" for keys(%count)' file
Запустите файл вашего примера, это возвращает:
$ perl -00ne 'next unless /CARTESIAN COORDINATES \(A\.U\.\)/;
$count{$_}++ for (/\s+\d+\s+(\w+)\s/g);
print "$_$count{$_}" for keys(%count)' file
C5H2$
У этого нет последней строки новой строки, поэтому вы можете добавить его с помощью:
$ perl -00ne 'next unless /CARTESIAN COORDINATES \(A\.U\.\)/;
$count{$_}++ for (/\s+\d+\s+(\w+)\s/g);
print "$_$count{$_}" for keys(%count); print "\n"' file
C5H2
Вам необходимо настроить свой почтовый клиент системы, входящий в пакет mailutils, для получения почты из вашей онлайн-учетной записи (например, gmail). В прошлый раз, когда я проверял, что функция уведомления по почте в byobu была преждевременной. См. Https://answers.launchpad.net/byobu/+question/143784
Вам необходимо настроить свой почтовый клиент системы, входящий в пакет mailutils, для получения почты из вашей онлайн-учетной записи (например, gmail). В прошлый раз, когда я проверял, что функция уведомления по почте в byobu была преждевременной. См. Https://answers.launchpad.net/byobu/+question/143784
Вам необходимо настроить свой почтовый клиент системы, входящий в пакет mailutils, для получения почты из вашей онлайн-учетной записи (например, gmail). В прошлый раз, когда я проверял, что функция уведомления по почте в byobu была преждевременной. См. Https://answers.launchpad.net/byobu/+question/143784
Вам необходимо настроить свой почтовый клиент системы, входящий в пакет mailutils, для получения почты из вашей онлайн-учетной записи (например, gmail). В прошлый раз, когда я проверял, что функция уведомления по почте в byobu была преждевременной. См. Https://answers.launchpad.net/byobu/+question/143784
Вам необходимо настроить свой почтовый клиент системы, входящий в пакет mailutils, для получения почты из вашей онлайн-учетной записи (например, gmail). В прошлый раз, когда я проверял, что функция уведомления по почте в byobu была преждевременной. См. Https://answers.launchpad.net/byobu/+question/143784
Вам необходимо настроить свой почтовый клиент системы, входящий в пакет mailutils, для получения почты из вашей онлайн-учетной записи (например, gmail). В прошлый раз, когда я проверял, что функция уведомления по почте в byobu была преждевременной. См. Https://answers.launchpad.net/byobu/+question/143784
Вам нужно настроить свой почтовый клиент системы, входящий в пакет mailutils, для получения почты из вашей онлайн-учетной записи (например, gmail). В прошлый раз, когда я проверял, что функция уведомления по почте в byobu была преждевременной. См. [D0] https://answers.launchpad.net/byobu/+question/143784
Вам нужно настроить свой почтовый клиент системы, входящий в пакет mailutils, для получения почты из вашей онлайн-учетной записи (например, gmail). В прошлый раз, когда я проверял, что функция уведомления по почте в byobu была преждевременной. См. [D0] https://answers.launchpad.net/byobu/+question/143784
Вам нужно настроить свой почтовый клиент системы, входящий в пакет mailutils, для получения почты из вашей онлайн-учетной записи (например, gmail). В прошлый раз, когда я проверял, что функция уведомления по почте в byobu была преждевременной. См. [D0] https://answers.launchpad.net/byobu/+question/143784