0

以下のコードは、ログ ファイルのサイズが 5 MB を超えるたびに、、などの名前logfile.log.1で新しいログ ファイルを作成します。logfile.log.2

しかし、 log4perlモジュールlogfile_20140530_15_31.logを使用して独自のログ ファイル名を作成するにはどうすればよいでしょうか?

my $log_conf = "
   log4perl.rootLogger              = DEBUG, LOG1

   log4perl.appender.LOG1           = Log::Dispatch::FileRotate
   log4perl.appender.LOG1.filename  = $logfile.log
   log4perl.appender.LOG1.mode      = append
   log4perl.appender.LOG1.autoflush = 1
   log4perl.appender.LOG1.size      = 1024000
   log4perl.appender.LOG1.max       = 5
   log4perl.appender.LOG1.layout    = Log::Log4perl::Layout::PatternLayout
   log4perl.appender.LOG1.layout.ConversionPattern = \%d{yyyy-MM-dd HH:mm:ss}\%P|\%p|\%m|\%n
";

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

my $logger = Log::Log4perl->get_logger();

$logger->info("error ");
4

1 に答える 1