CPAN install Log::Log4perl
perl -MCPAN -e ‘install Log::Log4perl’ でインストール
test.pl
#!/usr/bin/perl
#!C:\Perl\bin\perl
use Log::Log4perl;
# 設定ファイルの読み込み
Log::Log4perl::init(‘./log4perl.conf’);
# 設定ファイルに定義したloggerを生成
my $logger = Log::Log4perl::get_logger(“mylogger”);
#infoやらdebugやらで出力する
$logger->info(“this is INFO message”);
$logger->debug(“this is DEBUG message”);
設定ファイル 同じディレクトリに置く
log4perl.conf
log4perl.logger.mylogger = DEBUG, FileAppndr1
log4perl.appender.FileAppndr1 = Log::Log4perl::Appender::File
log4perl.appender.FileAppndr1.filename = debug.log
log4perl.appender.FileAppndr1.layout = Log::Log4perl::Layout::PatternLayout
log4perl.appender.FileAppndr1.layout.ConversionPattern = %d %F(%L) [%p] %m %n
perl test.pl
debug,logの名前でこんな風に出力されればＯＫ
2007/09/06 18:57:16 log4.pl(10) [INFO] this is INFO message
2007/09/06 18:57:16 log4.pl(11) [DEBUG] this is DEBUG message
Perl Log4perl
投稿者: