NAME
Gungho::Log - Gungho Log Class
SYNOPSIS
$log = $c->log;
$log->debug($message);
$log->info($message);
$log->warn($message);
$log->error($message);
$log->fatal($message);
if ( $log->is_debug ) {
# expensive debugging
}See Gungho.
DESCRIPTION
This module provides the default, simple logging functionality for Gungho. If you want something different set $c->log in your application module, e.g.:
$c->log( MyLogger->new );Your logging object is expected to provide the interface described here. Good alternatives to consider are Log::Log4Perl and Log::Dispatch.
If you want to be able to log arbitrary warnings, you can do something along the lines of
$SIG{__WARN__} = sub { MyApp->log->warn(@_); };however this is (a) global, (b) hairy and (c) may have unexpected side effects. Don't say we didn't warn you.
LOG LEVELS
debug
$log->is_debug;
$log->debug($message);info
$log->is_info;
$log->info($message);warn
$log->is_warn;
$log->warn($message);error
$log->is_error;
$log->error($message);fatal
$log->is_fatal;
$log->fatal($message);METHODS
new
Constructor. Defaults to enable all levels unless levels are provided in arguments.
$log = Gungho::Log->new;
$log = Gungho::Log->new( 'warn', 'error' );levels
Set log levels
$log->levels( 'warn', 'error', 'fatal' );enable
Enable log levels
$log->enable( 'warn', 'error' );disable
Disable log levels
$log->disable( 'warn', 'error' );is_debug
is_error
is_fatal
is_info
is_warn
Is the log level active?
abort
Should Gungho emit logs for this request? Will be reset at the end of each request.
*NOTE* This method is not compatible with other log apis, so if you plan to use Log4Perl or another logger, you should call it like this:
$c->log->abort(1) if $c->log->can('abort');_send_to_log
$log->_send_to_log( @messages );This protected method is what actually sends the log information to STDERR. You may subclass this module and override this method to get finer control over the log output.
AUTHOR
This moduule is ripped right out of Catalyst. No, I'm not ashamed of it!
Sebastian Riedel, sri@cpan.org Marcus Ramberg, mramberg@cpan.org Christian Hansen, ch@ngmedia.com
COPYRIGHT
This program is free software, you can redistribute it and/or modify it under the same terms as Perl itself.