Как выделить цветом определенное слово, используя "tail -f" |
[исправить] |
Пример, выделения слова Reject при просмотре хвоста почтового лога:
tail -f /var/log/maillog |perl -p -e 's/Reject/\033\[46;1mReject\033[0m/gi;'
Если нужно не только выделять цветом, но и подавать звуковой сигнал при появлении test@test.ru:
tail -f /var/log/maillog |perl -p -e 's/(test\@test.ru)/\033\[46;1m$1\033[0m\007/gi;'
|
|
|
|
Раздел: Корень / Программисту и web-разработчику / Perl / Функции и модули в Perl |
1.1, ols (?), 15:26, 29/03/2005 [ответить] [﹢﹢﹢] [ · · · ]
| +/– |
А sed'ом слабо такое сделать?
зачем perl заводить для этого? | |
|
2.5, butcher (ok), 07:51, 30/03/2005 [^] [^^] [^^^] [ответить]
| +/– |
Во FreeBSD не GNU sed и grep тоже. Покажите мне, как это сделать ими? | |
|
|
4.10, talmuth (?), 17:02, 30/03/2005 [^] [^^] [^^^] [ответить]
| +/– |
забыл сказать
~ > uname -srm
FreeBSD 5.4-PRERELEASE i386
все штатное | |
|
|
|
|
2.3, Maxim Chirkov (ok), 15:56, 29/03/2005 [^] [^^] [^^^] [ответить]
| +/– |
>grep --color
>(grep (GNU grep) 2.5.1-FreeBSD)
А строки не попавшие под маску grep ?
Хотя оперируя -B и -C еще удобнее получается. | |
|
1.7, VaNO (??), 10:48, 30/03/2005 [ответить] [﹢﹢﹢] [ · · · ]
| +/– |
Народ ткните ноcом меня где можно подробно прочитать о ^[\[46;1m ^[[0m и разобраться раз и навсегда. | |
1.12, Andrei (??), 03:23, 02/07/2005 [ответить] [﹢﹢﹢] [ · · · ]
| +/– |
Сложности какие...
less mail.log
далее - /что_искать (поиск слова что_искать)
Далее - Shift-F
Все. что_искать будет появляться выделенное цветом.
| |
1.13, Evgeny (??), 09:37, 25/10/2005 [ответить] [﹢﹢﹢] [ · · · ]
| +/– |
Дельный совет!
А вот как выделить налету разными цветами нужные части лога по маске:
SMTP session terminated - красным цветом
SMTP session successful - зеленым?
| |
|