use Term::ANSIColor; print "a ".color('yellow')."YELLOW".color('reset')." word\n";