Help for this page

Select Code to Download


  1. or download this
    my $log4perl_conf = q(
log4perl.logger=DEBUG, STRINGCOLLECTOR
...
log4perl.appender.STRINGCOLLECTOR.layout.ConversionPattern = %p:%d{ISO
+8601}:myscript: %m%n
);
Log::Log4perl->init( \$log4perl_conf );
  2. or download this
    my $appender = $self->logger->appender_by_name('STRINGCOLLECTOR');
my $string = '';
if($appender) {
    $string = $appender->string();
}