次の内容の出力ファイルがあります。「パターン」に基づいてブロックに分割し、配列に格納したい。
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で達成する方法を教えてください