File: colors-example.pl

package info (click to toggle)
multitail 5.2.9-1
  • links: PTS
  • area: main
  • in suites: wheezy
  • size: 824 kB
  • sloc: ansic: 14,404; makefile: 96; sh: 51; perl: 25
file content (12 lines) | stat: -rwxr-xr-x 169 bytes parent folder | download | duplicates (9) 
1
2
3
4
5
6
7
8
9
10
11
12
 
#!/usr/bin/perl

# disable I/O buffering (this is essential)
$| = 1;

while(<>)
{
	# 2 colors
	print "2,4,red,yellow,bold\n";
	print "6,7,green,white\n";
	print "\n";
}