1.安装Win32::Console::ANSI (注意和Win32::Console不同)
perl -MCPAN -e shell cpan> install Win32::Console::ANSI
2. Term::ANSIColor
use Win32::Console::ANSI; use Term::ANSIColor; print color("blue"), "blue\n", color("reset"); print "normal\n";