11 julio 2013

Cómo resaltar palabras claves con perl cuando usamos tail

Receta sencilla para resaltar texto cuando, por ejemplo, estamos haciéndole tail a un log:

tail -f file.log | perl -pe 's/keyword/\e[1;31;43m$&\e[0m/g'

La parte de “\e…/g” se puede reemplazar por algunos enteros separados por puntos y comas, por ejemplo:

0: sin atributos
1: negrita
31: rojo en primer plano
43: fondo amarillo

“keyword” puede ser cualquier expresión regular en perl.

Hasta la próxima!