Help for this page
use Term::ANSIColor qw(:constants);
my $can_color = 0; eval { ... $Term::ANSIColor::AUTORESET = 1; $can_color = 1 }