RE: [log4perl-devel] use strict and JavaMap::RollingFileAppender problem

[Viner, D. <dv...@ya...>]

After some more digging, I think I've found the problem.

Log::Log4perl::JavaMap::RollingFileAppender is a wrapper around
Log::Dispatch::FileRotate.  This module uses the token 'debug' as a flag to
toggle internal debugging statements.  I believe that this causes a conflict
with the Log::Log4perl's expections of the 'debug' token in the hash that is
$self.

The attached patch to Log::Dispatch::FileRotate fixes the problem for
Log::Log4perl.  Mark, as the owner of the FileRotate module, can you review
this patch?

thanks
dave viner


-----Original Message-----
From: Viner, David [mailto:dv...@ya...]
Sent: Wednesday, September 24, 2003 10:47 AM
To: 'log...@li...'
Subject: [log4perl-devel] use strict and JavaMap::RollingFileAppender
problem


Hi,
    I'm trying to use the RollingFileAppender, but I keep getting this
error:

Can't use string ("debug") as a HASH ref while "strict refs" in use at
/home/y/lib/perl5/site_perl/5.6.1/Log/Log4perl/JavaMap/RollingFileAppender.p
m line 12.

My log config file is really simple:

log4perl.logger.test = DEBUG, FR1
log4perl.appender.FR1           =
Log::Log4perl::JavaMap::RollingFileAppender
log4perl.appender.FR1.Threshold = DEBUG
log4perl.appender.FR1.layout    = Log::Log4perl::Layout::PatternLayout
log4perl.appender.FR1.layout.ConversionPattern = \
                          %d %p> %F{1}:%L %M - %m%n
log4perl.appender.FR1.filename  = test.log
log4perl.appender.FR1.mode = append
log4perl.appender.FR1.autoflush = 1
log4perl.appender.FR1.size = 2
log4perl.appender.FR1.max = 2

and my script is equally simple:

#!/usr/local/bin/perl -w

use strict;
use Log::Log4perl qw|get_logger|;

use constant LOGGER_NAME => 'test';

Log::Log4perl->init_and_watch('log.conf', 60);
my $logger = get_logger(LOGGER_NAME);

for(my $i=0; $i<100000; $i++)
  {
    $logger->debug("Message number $i is hello");
  }


I'm using version 0.36 of Log::Log4perl and perl 5.6.1.  

Am I doing something wrong? Or is this a known problem with a work-around?

thanks
dave viner



-------------------------------------------------------
This sf.net email is sponsored by:ThinkGeek
Welcome to geek heaven.
http://thinkgeek.com/sf
_______________________________________________
log4perl-devel mailing list
log...@li...
https://lists.sourceforge.net/lists/listinfo/log4perl-devel