Kazuhiro Osawa > Log-Dispatch-Screen-Color-0.04 > Log::Dispatch::Screen::Color

Download:
Log-Dispatch-Screen-Color-0.04.tar.gz

Dependencies

Annotate this POD

View/Report Bugs
Module Version: 0.04   Source  

NAME ^

Log::Dispatch::Screen::Color - attached color for Log::Dispatch::Screen

SYNOPSIS ^

  use Log::Dispatch::Screen::Color;

  my $log = Log::Dispatch::Screen::Color->new(
      name      => 'test',
      min_level => 'debug',
      stderr    => 1,
  );

  # not use default color map
  my $log = Log::Dispatch::Screen::Color->new(
      name      => 'test',
      min_level => 'debug',
      stderr    => 1,
      color     => {
          info  => {
              text => 'red',
          },
          error   => {
              background => 'red',
          },
          alert   => {
              text       => 'red',
              background => 'white',
          },
          warning => {
              text       => 'red',
              background => 'white',
              bold       => 1,
          },
      },
  );

  $log->log( level => 'info', message => "I like wasabi!\n" );

DESCRIPTION ^

Log::Dispatch::Screen::Color is attaching a color safely for Screen. because Log::Dispatch::Colorful has rewrite Log::Dispatch method problem.

Win32 is supported.

Note that a newline will not be added automatically at the end of a message by default. To do that, pass newline => 1.

OVERRIDES ^

Setting $Log::Dispatch::Screen::Color::DEFAULT_COLOR overrides. default color is changed.

  local $Log::Dispatch::Screen::Color::DEFAULT_COLOR->{info} = {
    text => 'red',
  };

AUTHOR ^

Kazuhiro Osawa <yappo <at> shibuya <döt> pl>

SEE ALSO ^

Log::Dispatch, Log::Dispatch::Screen

LICENSE ^

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

syntax highlighting: