use Log::Log4perl::Appender::TestBuffer; my $appender = Log::Log4perl::Appender::TestBuffer->new( name => 'mybuffer', ); # Append to the buffer $appender->log( level = > 'alert', message => "I'm searching the city for sci-fi wasabi\n" ); # Retrieve the result my $result = $appender->buffer(); # Clear the buffer to the empty string $appender->clear();
Every buffer created is stored in an internal global array, and can later be referenced by name:
my $app = Log::Log4perl::Appender::TestBuffer->by_name("mybuffer");
retrieves the appender object of a previously created buffer ``mybuffer''. To reset this global array and have it forget all of the previously created testbuffer appenders (external references to those appenders nonwithstanding), use
Log::Log4perl::Appender::TestBuffer->reset();
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
http://github.com/mschilli/log4perl
Send bug reports or requests for enhancements to the authors via our
MAILING LIST (questions, bug reports, suggestions/patches): log4perl-devel@lists.sourceforge.net
Authors (please contact them via the list above, not directly): Mike Schilli <m@perlmeister.com>, Kevin Goess <cpan@goess.org>
Contributors (in alphabetical order): Ateeq Altaf, Cory Bennett, Jens Berthold, Jeremy Bopp, Hutton Davidson, Chris R. Donnelly, Matisse Enzer, Hugh Esco, Anthony Foiani, James FitzGibbon, Carl Franks, Dennis Gregorovic, Andy Grundman, Paul Harrington, Alexander Hartmaier David Hull, Robert Jacobson, Jason Kohles, Jeff Macdonald, Markus Peter, Brett Rann, Peter Rabbitson, Erik Selberg, Aaron Straup Cope, Lars Thegler, David Viner, Mac Yang.