如何將錯誤消息輸出到其他日志文件？

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 。 有很好的介紹教程 。

對於小腳本，還可以使用簡易模式快速設置。