perl - 如何使用Log::Log4perl记录时区？

我们使用Log::Log4perl记录当前日期，如下所示：

log4perl.appender.perllog.layout.ConversionPattern=%d{yyyyMMdd.hhmmss:}-%P-%H-%p{2}-%m

有没有办法记录时区？

最佳答案

Log::Log4perl::Layout::PatternLayout中的日期格式由Log::Log4perl::DateFormat实现，它支持Z时区偏移量说明符：

use strict;
use warnings 'all';

use Log::Log4perl;

my $conf = <<'CONF';
    log4perl.logger.Foo = INFO, perllog

    log4perl.appender.perllog          = Log::Log4perl::Appender::File
    log4perl.appender.perllog.filename = foo.log
    log4perl.appender.perllog.layout   = Log::Log4perl::Layout::PatternLayout
    log4perl.appender.perllog.layout.ConversionPattern = \
        %d{yyyyMMdd.hhmmssZ:}-%P-%H-%p{2}-%m
CONF

Log::Log4perl::init(\$conf);

my $logger = Log::Log4perl->get_logger('Foo');
$logger->warn('Hello, timezone!');

输出：

20160831.094036-0600:-28223-www.example.com-WA-Hello, timezone!

没有记录在Log :: Log4perl :: Layout :: PatternLayout;中。通常，使用未记录的功能不是一个好主意，但是在这种情况下，当功能添加到另一个模块时，作者似乎只是忘记更新一个模块中的文档。我已提交a ticket来更新文档。

关于perl - 如何使用Log::Log4perl记录时区？，我们在Stack Overflow上找到一个类似的问题：https://stackoverflow.com/questions/39253229/