The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Mojo::Log - Simple logger

SYNOPSIS

  use Mojo::Log;

  # Log to STDERR
  my $log = Mojo::Log->new;

  # Customize log file location and minimum log level
  my $log = Mojo::Log->new(path => '/var/log/mojo.log', level => 'warn');

  # Log messages
  $log->debug('Why is this not working?');
  $log->info('FYI: it happened again.');
  $log->warn('This might be a problem.');
  $log->error('Garden variety error.');
  $log->fatal('Boom!');

DESCRIPTION

Mojo::Log is a simple logger for Mojo projects.

EVENTS

Mojo::Log inherits all events from Mojo::EventEmitter and can emit the following new ones.

message

  $log->on(message => sub {
    my ($log, $level, @lines) = @_;
    ...
  });

Emitted when a new message gets logged.

  $log->unsubscribe('message');
  $log->on(message => sub {
    my ($log, $level, @lines) = @_;
    say "$level: ", @lines;
  });

ATTRIBUTES

Mojo::Log implements the following attributes.

handle

  my $handle = $log->handle;
  $log       = $log->handle(IO::Handle->new);

Log filehandle used by default message event, defaults to opening path or STDERR.

level

  my $level = $log->level;
  $log      = $log->level('debug');

Active log level, defaults to debug. Note that the MOJO_LOG_LEVEL environment variable can override this value.

These levels are currently available:

debug
info
warn
error
fatal

path

  my $path = $log->path
  $log     = $log->path('/var/log/mojo.log');

Log file path used by handle.

METHODS

Mojo::Log inherits all methods from Mojo::EventEmitter and implements the following new ones.

new

  my $log = Mojo::Log->new;

Construct a new Mojo::Log object and subscribe to message event with default logger.

debug

  $log = $log->debug('You screwed up, but that is ok.');
  $log = $log->debug('All', 'cool!');

Log debug message.

error

  $log = $log->error('You really screwed up this time.');
  $log = $log->error('Wow', 'seriously!');

Log error message.

fatal

  $log = $log->fatal('Its over...');
  $log = $log->fatal('Bye', 'bye!');

Log fatal message.

format

  my $msg = $log->format(debug => 'Hi there!');
  my $msg = $log->format(debug => 'Hi', 'there!');

Format log message.

info

  $log = $log->info('You are bad, but you prolly know already.');
  $log = $log->info('Ok', 'then!');

Log info message.

is_level

  my $bool = $log->is_level('debug');

Check log level.

is_debug

  my $bool = $log->is_debug;

Check for debug log level.

is_error

  my $bool = $log->is_error;

Check for error log level.

is_fatal

  my $bool = $log->is_fatal;

Check for fatal log level.

is_info

  my $bool = $log->is_info;

Check for info log level.

is_warn

  my $bool = $log->is_warn;

Check for warn log level.

log

  $log = $log->log(debug => 'This should work.');
  $log = $log->log(debug => 'This', 'too!');

Emit message event.

warn

  $log = $log->warn('Dont do that Dave...');
  $log = $log->warn('No', 'really!');

Log warn message.

SEE ALSO

Mojolicious, Mojolicious::Guides, http://mojolicio.us.