perl - Log4perl 缺少初始化

Question

我写了一个 A 类，我在其中定义和初始化了一个 rootlogger

my $conf = q(
          log4perl.rootLogger = ERROR, LOGFILE   
          log4perl.appender.LOGFILE.filename = /var/log/Application.log
          log4perl.appender.LOGFILE = Log::Log4perl::Appender::File
          log4perl.appender.LOGFILE.mode = write  
          log4perl.appender.LOGFILE.layout = PatternLayout
          log4perl.appender.LOGFILE.layout.ConversionPattern = [%r] %F %L %c - %m%n
          );
Log::Log4perl->init(\$conf);

在 AI 的一个子类中想使用这个记录器

$self->LOG(Log::Log4perl->get_logger("Hotels"));
$self->LOG()->info("Starting 'Hotels'");

运行应用程序时，我收到消息

Log4perl：似乎没有发生初始化。忘记调用 init()？

为什么init无法识别？

KDJ

Answer 1

你的例子缺乏足够的细节让我理解发生了什么。

但这是一个有效的例子。

use strict;
use warnings;
use Log::Log4perl;


my $conf = q(
          log4perl.rootLogger = ERROR, LOGFILE   
          log4perl.appender.LOGFILE.filename = /tmp/Application.log
          log4perl.appender.LOGFILE = Log::Log4perl::Appender::File
          log4perl.appender.LOGFILE.mode = write  
          log4perl.appender.LOGFILE.layout = PatternLayout
          log4perl.appender.LOGFILE.layout.ConversionPattern = [%r] %F %L %c - %m%n
          );
Log::Log4perl->init(\$conf);

my $logger = Log::Log4perl->get_logger("Hotels");

$logger->error("test");