Re: Log::Log4Perl best practices

[bl0rf]

in reply to Log::Log4Perl best practices

Try putting

use Log::Log4perl qw(:levels);
Log::Log4perl::init('/home/code/log4perl-conf.txt');
my $logger = Log::Log4perl->get_logger($0);
$SIG{__DIE__} = sub {$Log::Log4perl::caller_depth++; $logger->fatal('f
+atal: ', @_); die @_;};

into a separate module, that doesn't have a separate package. Then include only that module in your scripts, this should reduce the extra code to a single use..blah.. statement.