log4perl.appender.Logfile.filename = test.log

##</code><code>##

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

##</code><code>##

    log4perl.appender.DBI.user = sub { $ENV{USERNAME} };