0

何かコツをお聞きしたいです。私のコードは次の数行のようになります:

#!/usr/bin/env perl

while (<DATA>) {
 if (/\bSTART\b/ .. /\bEND\b/) {
    #$together = $_;
    #$together = chomp ($_);  
    print ($_, "\n");   
 }
}

__DATA__
rubish
rub
START Data Data Data start 15.05.2015 Data i want end Data 
END
rubishend

*****************
example:
START new line 1 line 2new line 3 END
*****************

私の目標は、多くの行ログをフィルタリングすることです。出力は正規表現に一致する 1 行または 2 行です。しかし、出力は1行にすることができます->それは私が望むものです。または 2 行。この場合、2 行目を最初の行の最後に結合する必要があります。私のコードからの出力は次のようになります。

START Data Data Data start 15.05.2015 Data i want end Data 
END
START new line 1 line 2new line 3 END

私が欲しいのは:

START Data Data Data start 15.05.2015 Data i want end Data END
START new line 1 line 2new line 3 END

2 つのライン出力を区別して 1 つのラインに接続する方法のヒントはありますか? 次のステップでより良い解析を行うには?ご回答ありがとうございます

4

1 に答える 1