1

我正在读这个,我很困惑和卡住。

我应该同时使用ALWAYS还是print_portfolio('themessage')同时打印和登录到文件?

我想做的事:

if ($logfile) {
   open (FILE, '>>', "logfile");
   print "Hello" #some code from Log4perl#;
   #prints on the display and into the logfile
}

代替:

if ($logfile) { open (FILE, '>>', "logfile"); }
print "Hello";
if ($logfile) { print FILE "Hello"; }
4

1 回答 1

6

你两个都不用。

  • ALWAYS是一个日志级别,无论选择何种日志级别,它都会始终打印。日志记录级别是一种根据所选级别控制记录器记录多少信息的方法

  • print_portfolio子例程是一个与同时记录到屏幕和文件并没有太大关系的示例。

我相信Perl 部分中的高级配置有一个关于如何设置记录器以同时打印到屏幕和文件的清晰示例:

这是一个关于如何在 Perl 中配置两个具有相同布局的附加程序的示例,而根本不使用配置文件:

########################
# Initialization section
########################
use Log::Log4perl;
use Log::Log4perl::Layout;
use Log::Log4perl::Level;

   # Define a category logger
my $log = Log::Log4perl->get_logger("Foo::Bar");

   # Define a layout
my $layout = Log::Log4perl::Layout::PatternLayout->new("[%r] %F %L %m%n");

   # Define a file appender
my $file_appender = Log::Log4perl::Appender->new(
                        "Log::Log4perl::Appender::File",
                        name      => "filelog",
                        filename  => "/tmp/my.log");

   # Define a stdout appender
my $stdout_appender =  Log::Log4perl::Appender->new(
                        "Log::Log4perl::Appender::Screen",
                        name      => "screenlog",
                        stderr    => 0);

   # Have both appenders use the same layout (could be different)
$stdout_appender->layout($layout);
$file_appender->layout($layout);

$log->add_appender($stdout_appender);
$log->add_appender($file_appender);
$log->level($INFO);
于 2011-12-23T21:12:01.737 回答