use Log::Log4perl::Appender::ScreenColoredLevels