SYNOPSIS

# Set up some kind of logger
use Log::Any::Adapter;
Log::Any::Adapter->set( 'SomeAdapter' );

# Add a log history to the adapter
use Log::Any::Plugin;
Log::Any::Plugin->add( 'History', size => 5 );

DESCRIPTION

Log::Any::Plugin::History adds a history mechanism to your Log::Adapter, modelled after that of Mojo::Log. The history is an array reference with the most recent messages that have been logged.

CONFIGURATION

• size

  Sets the maximum number of logged messages to store in the history. This value defaults to 10.

  Note that, to more closely mimic the behaviour of Mojo::Log, assigning a value lower than the current size of the log history will not immediately discard offending values, since the shifting takes place at the time of logging.

• timestamp

  The log history stores a timestamp for each logged message. By default, this is the return of a call to time, but this can be overriden with the timestamp option.

  This option takes a code reference, the result of which will be saved in the history. The subroutine will be called with no arguments, and should return something that makes sense as a timestamp for your application.

METHODS

This plugin adds the following two methods to your adapter:

• history

• history( $arrayref )

  Sets or gets the current log history. When used as a getter it returns the existing value; otherwise it returns the logging object.

• max_history_size

• max_history_size( $int )

  Sets or gets the current maximum size of the log history. When used as a getter it returns the existing value; otherwise it returns the logging object.

SEE ALSO

• Log::Any::Plugin
• Mojo::Log

AUTHOR

• José Joaquín Atria (jjatria@cpan.org)

COPYRIGHT AND LICENSE

This software is copyright (c) 2017 by José Joaquín Atria.

This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.