如何使用Perl在不同行中的两个关键字之间提取文本

Question

我有一个名为event.txt的文件，我需要一个Perl脚本来打开它并阅读tag1和tag2个关键字之间的行并将其打印在屏幕上。

我搜索了论坛并且有类似的问题，但我不知道应该如何打开文本文件并进行搜索。

Answer 1

while (<>) {
  print if /tag1/../tag2/;
}