colorful writing

ashok has asked for the wisdom of the Perl Monks concerning the following question:

Hi, I am looking for some hints/examples on writing output in colors on Windows platform in Perl. I tried with this code

use Term::ANSIColor;
print color("red"),"Hello",color("reset");
[download]

But I am getting some junk characters. Can You pl. help me? Thanks Ashok

Comment on colorful writing Download Code

Replies are listed 'Best First'.
Re: colorful writing by rlk (Pilgrim) on Jan 04, 2001 at 11:05 UTC
Win32::Console does the trick nicely. `use Win32::Console; $out = new Win32::Console(STD_OUTPUT_HANDLE); $out->Attr($FG_YELLOW \| $BG_BLUE); $out->Write("Hello, World!") or die "couldn't write!";` [download] -- Ryan Koppenhaver, Aspiring Perl Hacker "I ask for so little. Just fear me, love me, do as I say and I will be your slave."	[reply] [d/l]
Re: colorful writing by t0mas (Priest) on Jan 04, 2001 at 12:55 UTC
You will have to load the ANSI driver (ANSI.SYS) in order to use ANSI colors on your win32 command prompt. Instructions on how you do this on a NT box can be found here and here. /brother t0mas	[reply]