perl -we "use Win32::Console; $con = Win32::Console->new(STD_OUTPUT_HANDLE()); $con->Attr($ATTR_NORMAL);"