| MooseX-LazyLogDispatch documentation | Contained in the MooseX-LazyLogDispatch distribution. |
MooseX::LazyLogDispatch::Levels - Like MX::LazyLogDispatch, but with level-methods
package Foo;
use Moose;
with 'MooseX::LazyLogDispatch::Levels'
# ... See MooseX::LazyLogDispatch synposis
# for configuration
# But now you have direct level methods:
sub foo {
my ($self) = @_;
$self->debug('started foo');
# ^ is identical to v
$self->logger->debug("started foo");
}
See MooseX::LazyLogDispatch for the main docs.
This just adds level methods for the $self-logger> levels directly
to your class, in addition to bringing in that role.
MooseX::LazyLogDispatch MooseX::LogDispatch Log::Dispatch::Configurator Log::Dispatch::Config Log::Dispatch
Brandon Black <blblack@gmail.com>
Based in part on MooseX::LogDispatch by Ash Berlin <ash@cpan.org> and <perigrin@cpan.org>
This module is free software; you can redistribute it and/or modify it under the same terms as Perl itself. See perlartistic.
| MooseX-LazyLogDispatch documentation | Contained in the MooseX-LazyLogDispatch distribution. |
package MooseX::LazyLogDispatch::Levels; use strict; our $VERSION = '0.02'; use Moose::Role; with 'MooseX::LazyLogDispatch'; sub log { shift->logger->log(@_) } sub debug { shift->logger->debug(@_) } sub info { shift->logger->info(@_) } sub notice { shift->logger->notice(@_) } sub warning { shift->logger->warning(@_) } sub error { shift->logger->error(@_) } sub critical { shift->logger->critical(@_) } sub alert { shift->logger->alert(@_) } sub emergency { shift->logger->emergency(@_) } no Moose::Role; 1; __END__