为什么会这样?
test2color.pl
包含:
#! perl -slw
use strict;
use Win32::Console::ANSI;
use Term::ANSIColor qw(:constants);
print BLACK, ON_WHITE, "black on white\n";
print WHITE, ON_BLACK, "white on black\n";
print GREEN, ON_CYAN, BLINK, "garish!\n";
print RESET;
输出: