http://www.perlmonks.org?node_id=221538


in reply to Stupid console tricks (or color highlighted tail)

asking for console tips on windows XP... that's funny :)

To cat a log file and see error lines in red over black, I would could use this on my machine (linux):
perl -ne 'print /ERROR/ ? "\033[1;31m\033[40m$_\033[0m" : $_ ' my.log
A cool trick I use to follow a log file is use 'less my.log', /searchstring, SHIFT+f

now not only can I jump between a less and a tail -f, but also the searchstring is highlighted everytime it shows up.

tstock

update:
silly rotating star:
perl -e 'print "\b" . substr("|/-\\", time % 4, 1 ) while 1'