如何使用 Perl 提取不同行中两个关键字之间的文本 [关闭]答案

【问题标题】：How to extract the text between two keywords in different lines using Perl [closed]如何使用 Perl 提取不同行中两个关键字之间的文本 [关闭]
【发布时间】：2013-05-11 05:19:30
【问题描述】：

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

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

【问题讨论】：

请举例说明你想要得到的文件和想要的结果。
Stack Overflow 不是免费编写软件的地方。如果您不知道如何打开文件，那么您根本就不了解 Perl，您应该花一些时间学习该语言或花钱请人为您编写程序。当你没有机会自己做的时候，你要求白做工作是非常不礼貌的。

标签： perl extract keyword

【解决方案1】：

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

【讨论】：

您的解决方案现在正在运行，因为它不包括 OPEN 文件，所以这里是问题所在，因为我链接了其他人已经提出了类似的问题并获得了 7 个赞成票，这是怎么回事？！
@KMHs：Perl 使用<> 运算符从命令行中指定的文件中读取。您不必显式打开文件。