Log::Dispatch::Code(3pm)

SYNOPSIS

  use Log::Dispatch;
  my $log = Log::Dispatch->new(
      outputs => [
          [
              'Code',
              min_level => 'emerg',
              code      => \&_log_it,
          ],
      ]
  );
  sub _log_it {
      my %p = @_;
      warn $p{message};
  }

DESCRIPTION

This module supplies a simple object for logging to a subroutine reference.

CONSTRUCTOR

The constructor takes the following parameters in addition to the standard parameters documented in Log::Dispatch::Output:

•

code ($)

The subroutine reference.

HOW IT WORKS

The subroutine you provide will be called with a hash of named arguments. The two arguments are:

• level

  The log level of the message. This will be a string like "info" or "error".

• message

  The message being logged.