NAME
Mojo::Log - Simple logger for Mojo
SYNOPSIS
use Mojo::Log;
# Create a logging object that will log to STDERR by default
my $log = Mojo::Log->new;
# Customize the log location and minimum log level
my $log = Mojo::Log->new(
path => '/var/log/mojo.log',
level => 'warn',
);
# Log messages
$log->debug("Why isn't this 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 can emit the following events.
message
$log->on(message => sub {
my ($log, $level, @messages) = @_;
...
});Emitted when a new message gets logged.
$log->unsubscribe('message');
$log->on(message => sub {
my ($log, $level, @messages) = @_;
say "$level: ", @messages;
});ATTRIBUTES
Mojo::Log implements the following attributes.
handle
my $handle = $log->handle;
$log = $log->handle(IO::File->new);Logfile handle used by default message event, defaults to opening the value of path or STDERR.
level
my $level = $log->level;
$log = $log->level('debug');Active log level, defaults to debug.
These levels are currently available:
debuginfowarnerrorfatal
path
my $path = $log->path
$log = $log->path('/var/log/mojo.log');Logfile 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 debug message.
error
$log = $log->error('You really screwed up this time');Log error message.
fatal
$log = $log->fatal('Its over...');Log fatal message.
format
my $message = $log->format('debug', 'Hi there!');
my $message = $log->format('debug', 'Hi', 'there!');Format log message.
info
$log = $log->info('You are bad, but you prolly know already');Log info message.
is_level
my $success = $log->is_level('debug');Check log level.
is_debug
my $success = $log->is_debug;Check for debug log level.
is_error
my $success = $log->is_error;Check for error log level.
is_fatal
my $success = $log->is_fatal;Check for fatal log level.
is_info
my $success = $log->is_info;Check for info log level.
is_warn
my $success = $log->is_warn;Check for warn log level.
log
$log = $log->log(debug => 'This should work');Emit message event.
warn
$log = $log->warn('Dont do that Dave...');Log warn message.