log4perl.appender.Logfile.filename = sub { get_log_filename(); }