サーバーのログデータを抽出

質問

redhat8.0のサーバー上にあるログデータをホームディレクトリにコピーし、コピーされたファイルの中のログデータをperlの正規表現を使って抽出し、抽出されたデータを別ファイルに書き出したいのです。
初心者なのでわかりやすく回答していただけると助かります。

回答No.1

BLUEPIXY · ベストアンサー

やり方は色々あって、バージョンや使用モジュール等によっても違うと思いますが、だいたい、次のような感じでやればいいと思います。
system("cp *.log .");
の様にコマンドを実行することができます。
cpコマンドは知ってますよね。

open(IN, "error.log");
open(OUT, "select.data");

でファイルを関連ハンドル（上記でいうIN,OUT）に関連づけます。

while(<IN>){ #の様にファイルから読み出します。
if(/selectPattern/){ #正規表現でマッチングさせます
print OUT $_ ; #マッチングした行を出力します
}
}
close(IN);
close(OUT); #使ったファイルをクローズします

のような感じでやればいいと思います。
複数のファイルを扱うなら、グロブを使うか、コマンドラインから標準入力としてインプットを作るのがいいかと思います。
余計ですけど、Perlでファイルを最初にコピーしてくる理由がわかりません。

補足

最初のファイルのコピーはperlによってではありません。
端末の方から手動でコピーする予定です。