我有这个子来初始化我的记录器:
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?
答案 0 :(得分:6)
答案 1 :(得分:5)
Log :: Log4perl-> easy_init()使用ScreenAppender初始化库,这就是将日志发送到stdout的原因。
删除它并添加以下内容以将所有日志(调试级别及更高级别)写入文件:
Log::Log4perl->get_logger()->level($DEBUG);