First, you dont have to use file to store log4perl config, you could use strings to initialize the logger.
Second, you could use filerotate appender to create a new logfile every day, keep the last n files.
In your example every call will creates a new file. If you use only day 'specific' patter it will create a new file every day:
our $timeStamp = sprintf("%04d_%02d%02d", $now[5]+1900, $now[4]+1, $now[3]);
);
Regards,
filerotate:
my $fullLogPath = $output_dir . "/" . $log_dir . "/" . "testlogger.log";
# Logger config
my $log_conf = q(
log4perl.category = INFO, FileAppndr
log4perl.appender.FileAppndr = Log::Dispatch::FileRotate
log4perl.appender.FileAppndr.filename = $fullLogPath
log4perl.appender.FileAppndr.mode = append
log4perl.appender.FileAppndr.DatePattern = yyyy-MM-dd
log4perl.appender.FileAppndr.max = 10
log4perl.appender.FileAppndr.TZ = GMT
log4perl.appender.FileAppndr.layout = PatternLayout
log4perl.appender.FileApp.layout.ConversionPattern = %F{1} %n %m%n
);
# Initialize Logger
Log::Log4perl::init_once(\$log_conf);