如何将错误消息输出到其他日志文件？

Question

在Perl中你可以：

print STDERR "bla bla bla"; 

...并且Apache会将其转储到/etc/httpd/logs/error_log 。

但是如果我想将一些错误/警告消息发送到不同的日志文件呢？

如何在Perl中创建一个函数来执行此操作？

print MYLOGFILE "bla bla bla"

...渲染到/logs/my_favorite_log ？

Answer 1

你应该看一下Perl的一些正式的日志包，比如log4perl 。 毫无疑问，还有其他人。

Answer 2

使用Log :: Trivial

use Log::Trivial;
my $logfile = Log::Trivial->new(log_file => "logs/my_favourite.log");
$logfile->set_level(3);
$logfile->write(comment => "bla bla bla");

Answer 3

我建议按照Will的建议查看Log :: Log4perl 。 有很好的介绍教程 。

对于小脚本，还可以使用简易模式快速设置。