ログのフィルタリングの履歴

履歴一覧

簡単だけど、こんな感じでスクリプトを作っておくと便利。

#!/usr/bin/perl
use strict;
use warnings;
use utf8;
use constant    C_ERROR =>      "\x1b[31;3;31m";
use constant    C_DEBUG =>      "\x1b[32;3;32m";
use constant    C_RET   =>      "\x1b[38;;38m";

while ( <> ) {
        $_ =~ s/(error)/C_ERROR().$1.C_RET()/ige;
        $_ =~ s/(debug)/C_DEBUG().$1.C_RET()/ige;
        print $_;
}


"error"や"debug"の文字が出てくるとそこだけ着色してくれる。

プチ便利。