#!/usr/bin/perl6
use Inline::Perl5;
use Term::ANSIColor:from<Perl5> <color RED RESET>;

my $Red   = color("red");
my $Reset = color("reset");
say $Red ~ "--Red--" ~ $Reset;
say RED  ~ "--Red--" ~  RESET;
say "{RED}--Red--{RESET}";

# And Laurent_R is right:
my $Blue  = Term::ANSIColor::color("blue");
say $Blue ~ "--Blue--" ~ $Reset;