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