Log::Log4perl::init(\$log_conf); my $log = Log::Log4perl->get_logger; if ($opt{d}) { # if starting as a daemon... # turn off the Screen appender # ?? # change the log level use Log::Log4perl::Level; $log->level($INFO); }