Provided by: libcatmandu-perl_0.9505-1_all
NAME
Catmandu::Logger - A role for classes that need logging capabilities
NAME
Catmandu::Logger - Logging class for Catmandu
SYNOPSIS
package MyApp::View; use Moo; with 'Catmandu::Logger'; sub something { my ($self) = @_; $self->log->debug("started bar"); # logs with default class catergory "MyApp::View" $self->log->error("started bar"); }
DESCRIPTION
A logging role building a very lightweight wrapper to Log::Any. Connecting a Log::Any::Adapter should be performed prior to logging the first log message, otherwise nothing will happen, just like with Log::Any. The logger needs to be setup before using the logger, which could happen in the main application: package main; use Log::Any::Adapter; use Log::Log4perl; Log::Any::Adapter->set('Log4perl'); Log::Log4perl::init('./log4perl.conf'); my $app = MyApp::View->new; $app->something(); # will print debug and error messages with log4perl.conf as: log4perl.rootLogger=DEBUG,STDOUT log4perl.appender.STDOUT=Log::Log4perl::Appender::Screen log4perl.appender.STDOUT.stderr=1 log4perl.appender.STDOUT.utf8=1 log4perl.appender.STDOUT.layout=PatternLayout log4perl.appender.STDOUT.layout.ConversionPattern=%d [%P] - %p %l time=%r : %m%n
ACCESSORS
log The "log" attribute holds the Log::Any::Adapter object that implements all logging methods for the defined log levels, such as "debug" or "error". package MyApp::View::JSON; extends 'MyApp::View'; with 'Catmandu::Logger'; sub bar { $self->log->info("Everything fine so far"); # logs a info message $self->log->debug("Something is fishy here"); # logs a debug message } Your package automatically has a logging category of MyApp::View::JSON. Use lines like: log4perl.logger.MyApp::View::JSON=DEBUG,STDOUT or log4perl.logger.MyApp::View=DEBUG,STDOUT or log4perl.logger.MyApp=DEBUG,STDOUT for specialized logging for your application.
SEE ALSO
Log::Any
ACKNOWLEDGMENTS
Code and documentation blatantly stolen from "MooX::Log::Any".