Как я могу получить несколько строк после совпадающей строки в Perl?
Я построчно анализирую большой файл в Perl (завершается \ n), но когда я достигаю определенного ключевого слова, скажем «TARGET», мне нужно перехватить все строки между TARGET и следующей полностью пустой строкой ,
Итак, учитывая сегмент файла:
Строка 1
Линия 2
Линия 3
Линия 4 Цель
Строка 5 Захватите эту строку
Строка 6 Захватите эту строку
\ п
Это должно стать:
Линия 4 Цель
Строка 5 Захватите эту строку
Строка 6 Захватите эту строку
Причина, по которой у меня возникают проблемы, заключается в том, что я уже перебираю файл построчно; Как мне изменить то, что я делим в середине процесса разбора?