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