$cat color.pl #!/usr/bin/perl use Term::ANSIColor qw(:constants); print BOLD, BLUE, "This text is in bold blue.\n", RESET; print RED, "This text is red.\n", RESET; $ ./color.pl This text is in bold blue. This text is red. $
To set the AUTORESET feature so you can loose the RESET tokens set $Term::ANSIColor::AUTORESET = 1 just after the use. RTFS to see the available constants. Don't use BLINK :o)
cheers
tachyon
In reply to Re^3: using colors with print()
by tachyon
in thread using colors with print()
by drwxrwxrwx
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |