package Your::Module;
# ...
sub set_log_file {
    my( $we, $log_file ) = @_;
    Log::Log4perl->init( \"... $log_file ..." );
}