如何在Log4perl中抑制输出到stdout和stderr?

时间:2009-08-21 10:29:18

标签: perl stdout log4perl

我有这个子来初始化我的记录器:

sub initLogfiles{
    Log::Log4perl->easy_init($INFO); # We log all debug, info, warn, error and fatal messages.
        my $userlogappender = Log::Log4perl::Appender->new(
        "Log::Log4perl::Appender::File",
        filename => USERLOGFILE,
        mode     => "append",
        recreate => 1
    );
    my $userloglayout = Log::Log4perl::Layout::PatternLayout->new("%d;%m%n");
    $userlogappender->layout($userloglayout);
    $userlogger->add_appender($userlogappender);
}

我只想在我的日志文件中使用loginfo。 我如何防止这次登录到stdout?

2 个答案:

答案 0 :(得分:6)

我找到了。 我必须将此行添加到我的子目录中:

$userlogger->additivity(0);

我在这里找到答案:log4perl FAQ

答案 1 :(得分:5)

Log :: Log4perl-> easy_init()使用ScreenAppender初始化库,这就是将日志发送到stdout的原因。

删除它并添加以下内容以将所有日志(调试级别及更高级别)写入文件:

 Log::Log4perl->get_logger()->level($DEBUG);