我有一个包含以下内容的输出文件。我想根据“模式”将它分成块并存储在一个数组中。
Sample output:
100 pattern
line 1
line 2
line 3
101 pattern
line 4
102 pattern
line 5
line 6
...
第n次和第 ( n +1)次“模式”出现之间的内容是一个块:
Block 1:
100 pattern
line 1
line 2
line 3
Block 2:
101 pattern
line 4
Block 3:
102 pattern
line 5
line 6
基本上我正在跨行搜索模式并将其间的内容存储到数组中。
请让我知道如何在 perl 中实现