CUIで一覧表示するプログラムを作った時なんかに便利です。NG行だけ色をつけるとか。 http://search.cpan.org/~rra/ANSIColor-1.12/ANSIColor.pm use Term::ANSIColor; print color ’bold blue’; print "This text is bold blue.\n"; print color ’reset’; print "This text is normal.\n"; print colored ("Yellow on magenta.\n", ’yellow on_magenta’); print "This text is normal.\n"; print colored [’yellow on_magenta’], "Yellow on magenta.\n"; use Term::ANS