======3.pl======
use Term::ANSIColor;
print colored ['red'], "test";
================