抱歉打错了
我有一个这样的日志文件:
mynum[85295365] | yournum[3201410] | mymessage[4 ????? 4 off] | MSGLen[1]
我会像这样给输出着色
mynum == foreground blue
yournum == foreground yellow
and mymessage == foreground green.
我的消息着色有问题。
我尝试了以下代码:
if($currentLine=~m/mymessage\[([\w+\d+\S]+){1,}\]/){
$mymessage=$1;
$outM="$mymessage";
$currentLine=~s/mymessage\[([\w+\d+\S]+){1,}\]/mymessage[$cg$outM$crs]/g;}
并没有结果没有。
帮帮我:(((((
最佳答案
使用Term::ANSIColor CPAN 模块。它允许您使用 ANSI 转义序列为屏幕输出着色
关于regex - 在 perl 中为日志输出(stdout)着色，我们在Stack Overflow上找到一个类似的问题： https://stackoverflow.com/questions/25226055/