У меня работает какой-то код Из-за сложности и длины я подумал, может быть, использовать какой-то код, чтобы сделать мою жизнь проще. Таким образом, код работает с использованием>commandA

output
results
are
popping
...
here

Я хочу посчитать количество разbanana появляется в выводеcommandA (который работает), и когда счетчик равен 10, я хочу остановить обработку (используяCTRL+Z) а также

echo "************we reached 10**********************"

и начни снова.

Я пишу код на Perl в системе Unix.

РЕДАКТИРОВАТЬ: я не могу использовать функцию grep здесь, так как команда уже запущена. Или будет запущен, но без функции grep. Перед выполнением команды я включу свою программу, чтобы найти конкретные слова в выводе терминала. Теперь было бы очень просто использовать grep, но я не знаю, какая функция в perl фактически принимает вывод на терминал как stdin