- $logDate = sprintf( '%04d%02d%02d', $year + 1900, $month + 1, $day );
+ my $logDir = $file{log} . sprintf('%04d', $year + 1900);
+ unless(-d $logDir) {
+ &status("openLog: making $logDir.");
+ mkdir $logDir, 0755 or &status("Cannot mkdir $logDir");;
+ }
+ $logDate = sprintf('%04d/%02d%02d', $year + 1900, $month + 1, $day);