Re: Term::ANSIColor and printf - easy way to use them together

use Term::ANSIColor qw( colored );

printf(
    "%4s %8s %4s\n",
    colored('Hello', 'bright_yellow on_magenta'),
    colored('Hello World', 'white on_blue'),
    colored('XXX', 'green on_white'),
);
[download]

perl -E'sub Monkey::do{say$_,for@_,do{($monkey=[caller(0)]->[3])=~s{::}{ }and$monkey}}"Monkey say"->Monkey::do'

Comment on Re: Term::ANSIColor and printf - easy way to use them together Download Code

Replies are listed 'Best First'.
Re^2: Term::ANSIColor and printf - easy way to use them together by bdalzell (Sexton) on Dec 03, 2012 at 22:51 UTC
Thank you so much, that does work!	[reply]