On Sun, 14 Nov 2004 20:44:36 +0800 (CST), Stephen Liu <[EMAIL PROTECTED]> wrote:
> #!/usr/bin/perl -w > use strict; > use warnings; > use Term::ANSIColor qw(:constants); > > print BOLD BLUE "Remark:\n", RESET; > print "OLINENO=Old Line No. NLINENO=New Line No.\n"; > print "OWORDNO=Old Word No. NWORDNO=New Word No.\n"; Put RESET on the line you want set as normal. Like this: print RED "This line is RED"; print RESET, "This line is not.\n"; __END__ -- WC -Sx- Jones http://insecurity.org/ -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>
