add Perl init default color.pl file