The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Log::Log4perl::Appender::ScreenColoredLevel - Colorize messages according to level

SYNOPSIS

    use Log::Log4perl qw(:easy);

    Log::Log4perl->init(\ <<'EOT');
      log4perl.category = DEBUG, Screen
      log4perl.appender.Screen = \
          Log::Log4perl::Appender::ScreenColoredLevels
      log4perl.appender.Screen.layout = \
          Log::Log4perl::Layout::PatternLayout
      log4perl.appender.Screen.layout.ConversionPattern = \
          %d %F{1} %L> %m %n
    EOT

      # Appears black
    DEBUG "Debug Message";

      # Appears green
    INFO  "Info Message";

      # Appears blue
    WARN  "Warn Message";

      # Appears magenta
    ERROR "Error Message";

      # Appears red
    FATAL "Fatal Message";

DESCRIPTION

This appender acts like Log::Log4perl::Appender::Screen, except that it colorizes its output, based on the priority of the message sent.

The color scheme is

Debug

Black

Info

Green

Warn

Blue

Error

Magenta

Fatal

Red

The constructor new() takes an optional parameter stderr, if set to a true value, the appender will log to STDERR. If stderr is set to a false value, it will log to STDOUT. The default setting for stderr is 1, so messages will be logged to STDERR by default.

AUTHOR

Mike Schilli <log4perl@perlmeister.com>, 2004