Beefy Boxes and Bandwidth Generously Provided by pair Networks
Don't ask to ask, just ask
 
PerlMonks  

Re: Perl Spots (in ANSI color!)

by wedman (Sexton)
on Aug 14, 2002 at 19:31 UTC ( #190208=note: print w/replies, xml ) Need Help??


in reply to Perl Spots

You could use ANSI colors...

my @CHARS = ( "\033[1;30;40m ", # dark grey on black "\033[1;30;40m@", # same thing, but prints '@' instead of ' ' "\033[1;30;47m@", # dark grey on light grey "\033[1;30;47m ", "\033[1;36;47m@", # light blue on light grey "\033[0;37;46m@", # light grey on light blue "\033[0;37;46m ", "\033[0;34;46m@", # dark blue on light blue "\033[0;36;44m@", # light blue on dark blue "\033[0;36;44m " );

Now, these are strings as opposed to characters, but it still works.

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://190208]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others having an uproarious good time at the Monastery: (8)
As of 2022-05-26 15:01 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    Do you prefer to work remotely?



    Results (93 votes). Check out past polls.

    Notices?