Re: print in purple question
[email protected] (Bruce Gray)
| Newsgroups | perl.perl6.users |
|---|---|
| Message-ID | <[email protected]> |
> On Nov 3, 2024, at 22:12, ToddAndMargo via perl6-users <[email protected]> wrote: > > Hi All, > > Fedora 41 > rakudo-pkg-2024.7.0-01.x86_64 > bash-5.2.32-1.fc41.x86_64 > > I am looking at > https://metacpan.org/pod/Term::ANSIColor > > trying to figure out how to print in dark purple. > I have see dnf5 do this, so I know it is possible. > > Now one of the hurdles is that purple is not an > actual color. It does not appear on a white > light spectrum break out. Purple is a manifestation > of our brains interpreting a mixture of red and blue. > > So how do I mix red and blue to get dark purple? > > Many thanks, > -T > Magenta is one of the standard ANSI terminal colors, so that is probably the color you are seeing in the `dnf` output as "purple". Simplest example, using module: raku -e 'use Terminal::ANSIColor; say color("magenta"), "this is in purple(magenta)", color("reset");' Just the four purples, in raw ANSI codes: raku -e 'say "\e\[{.[0]};{.[1]}m {.[0]};{.[1]} \e\[m " for (0,1) X (35,95);' Full color grid: raku -e ' my @fg = (31..37) X+ (0,60); my @bg = (41..47) X+ (0,60); say " ", @bg.fmt("--%3d--", " "); for @fg -> $f { print $f.fmt("%3d:"); for @bg -> $b { for 0,1 -> $a { my $z = "$a;$f;$b"; print "\e\[{$z}m $a \e\[m "; } } say ""; }' For more info: https://azrael.digipen.edu/~mmead/www/mg/ansicolors/index.html -- Hope this helps, Bruce Gray (Util of PerlMonks)