メモ use strict; use warnings; use Date::Calc; use Log::Log4perl; my $CONF = {log=> { # 'log4perl.rootLogger'=> 'INFO, LOGFILE', 'log4perl.rootLogger'=> 'DEBUG, LOGFILE, CONSOLE', 'log4perl.appender.LOGFILE'=>'Log::Log4perl::Appender::File…