logo
Free, unlimited AI code reviews that run on commit
git-lrc git-lrc GitHub Install Now We'd appreciate a star git-lrc - Free, unlimited AI code reviews that run on commit | Product Hunt git-lrc - Free, unlimited AI code reviews that run on commit | Product Hunt

MooseX::Log::Log4perl::Easy - A role for easy usage of logging in your Moose based modules based on

Accessors

logger
       See MooseX::Log::Log4perl

   log
       See MooseX::Log::Log4perl

   log_fatal($msg)
       Logs a fatal message $msg using the logger attribute. Same as calling

         $self->logger->fatal($msg)

   log_error($msg)
       Logs an error message using the logger attribute. Same as calling

         $self->logger->error($msg)

   log_warn($msg)
       Logs a warn message using the logger attribute. Same as calling

         $self->logger->warn($msg)

   log_info($msg)
       Logs an info message using the logger attribute. Same as calling

         $self->logger->info($msg)

   log_debug($msg)
       Logs a debug message using the logger attribute. Same as calling

         $self->logger->debug($msg)

   log_trace($msg)
       Logs a trace message using the logger attribute. Same as calling

         $self->logger->trace($msg)

Author

       Roland Lammel "<lammel@cpan.org>"

Description

       The "Easy" logging role based on the MooseX::Log::Log4perl logging role for Moose directly adds the log
       methods for all available levels to your class instance. Hence it is possible to use

         $self->log_info("blabla");

       without having to access a separate log attribute as in MooseX::Log::Log4perl;

       In case your app grows and you need more of the super-cow powers of Log4perl or simply don't want the
       additional methods to clutter up your class you can simply replace all code "$self->log_LEVEL" with
       "$self->log->LEVEL".

       You can use the following regex substitution to accomplish that:

         s/log(_(trace|debug|info|warn|error|fatal))/log->$2/g

Name

       MooseX::Log::Log4perl::Easy - A role for easy usage of logging in your Moose based modules based on
       MooseX::Log::Log4perl

See Also

       MooseX::Log::Log4perl

Synopsis

        package MyApp;
        use Moose;
        use Log::Log4perl qw(:easy);

        with 'MooseX::Log::Log4perl::Easy';

        BEGIN {
                Log::Log4perl->easy_init();
        }

        sub foo {
          my ($self) = @_;
          $self->log_debug("started bar");            ### logs with default class catergory "MyApp"
          $self->log_info('bar');                     ### logs an info message
          $self->log('AlsoPossible')->fatal("croak"); ### log
        }

See Also