2012-11-01 23 views

回答

2

沒有。這不是支持的功能。

5

看起來不像它,但你可以在那裏自己使用special literal

$log->debug(__LINE__ . ': Some debug message.'); 
0

你有沒有使用魔精::登錄?如果你可以使用MojoX :: Log :: Log4perl,那麼你就是免費的。

use MojoX::Log::Log4perl; 

sub startup { 
    ... 
    my $logconfig =<<EOF; 
    ... 
    log4perl.appender.FILE.layout.ConversionPattern = [%d] %P %p %C,%L - %m%n 
    ... 
EOF 

    my $mojox_logger = MojoX::Log::Log4perl->new(\$logconfig); 
    $self->log($mojox_logger); 
} 

ConversionPattern中的%L代表行號。

相關問題