Re: Log::Log4Perl best practices


Clear questions and runnable code get the best and fastest answer
	PerlMonks

Re: Log::Log4Perl best practices

by bl0rf (Pilgrim)

on Jun 01, 2004 at 00:43 UTC ( #357887=note: print w/replies, xml )

Need Help??

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 @_;};
[download]

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.

My site