The following code, attempting to roll a file every minute shows a warning ("Next occurance is null for 0:0:0:0:0:1:0") and doesn't rotate the file:
use Log::Dispatch::FileRotate;
my $file = Log::Dispatch::FileRotate->new(
name => 'file1',
min_level => 'info',
max => 10,
filename => 'Somefile.log',
mode => 'append' ,
TZ => 'GMT',
DatePattern => '0:0:0:0:0:1:0',
);
while(1) {
my $timestamp = scalar localtime time();
$file->log( level => 'info', message => "$timestamp\n");
sleep(10);
}
RT for rt.cpan.org