Mojo::Log - Simple logger
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!');
Mojo::Log is a simple logger for Mojo projects.
Mojo::Log inherits all events from Mojo::EventEmitter and can emit the following new ones.
$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; });
Mojo::Log implements the following attributes.
my $cb = $log->format; $log = $log->format(sub {...});
A callback for formatting log messages.
$log->format(sub { my ($time, $level, @lines) = @_; return "[Thu May 15 17:47:04 2014] [info] I ♥ Mojolicious.\n"; });
my $handle = $log->handle; $log = $log->handle(IO::Handle->new);
Log filehandle used by default "message" event, defaults to opening "path" or STDERR.
STDERR
my $history = $log->history; $log = $log->history([[time, 'debug', 'That went wrong.']]);
The last few logged messages.
my $level = $log->level; $log = $log->level('debug');
Active log level, defaults to debug. Available log levels are debug, info, warn, error and fatal, in that order. Note that the MOJO_LOG_LEVEL environment variable can override this value.
debug
info
warn
error
fatal
MOJO_LOG_LEVEL
my $size = $log->max_history_size; $log = $log->max_history_size(5);
Maximum number of logged messages to store in "history", defaults to 10.
10
my $path = $log->path $log = $log->path('/var/log/mojo.log');
Log file path used by "handle".
Mojo::Log inherits all methods from Mojo::EventEmitter and implements the following new ones.
$log->append("[Thu May 15 17:47:04 2014] [info] I ♥ Mojolicious.\n");
Append message to "handle".
$log = $log->debug('You screwed up, but that is ok.'); $log = $log->debug('All', 'cool!');
Log debug message.
$log = $log->error('You really screwed up this time.'); $log = $log->error('Wow', 'seriously!');
Log error message.
$log = $log->fatal('Its over...'); $log = $log->fatal('Bye', 'bye!');
Log fatal message.
$log = $log->info('You are bad, but you prolly know already.'); $log = $log->info('Ok', 'then!');
Log info message.
my $bool = $log->is_level('debug');
Check log level.
my $bool = $log->is_debug;
Check for debug log level.
my $bool = $log->is_error;
Check for error log level.
my $bool = $log->is_fatal;
Check for fatal log level.
my $bool = $log->is_info;
Check for info log level.
my $bool = $log->is_warn;
Check for warn log level.
$log = $log->log(debug => 'This should work.'); $log = $log->log(debug => 'This', 'too!');
Emit "message" event.
my $log = Mojo::Log->new;
Construct a new Mojo::Log object and subscribe to "message" event with default logger.
$log = $log->warn('Dont do that Dave...'); $log = $log->warn('No', 'really!');
Log warn message.
Mojolicious, Mojolicious::Guides, http://mojolicio.us.
To install Mojolicious, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Mojolicious
CPAN shell
perl -MCPAN -e shell install Mojolicious
For more information on module installation, please visit the detailed CPAN module installation guide.