Beefy Boxes and Bandwidth Generously Provided by pair Networks
Welcome to the Monastery
 
PerlMonks  

DBIx::Log4perl -- how to log my own errors

by tune (Curate)
on Jan 04, 2011 at 17:09 UTC ( #880419=perlquestion: print w/ replies, xml ) Need Help??
tune has asked for the wisdom of the Perl Monks concerning the following question:

Dear Monks! I am stuck with setting up DBIx::Log4perl in a database wrapper module. I am able to fire it up and all DBI methods like connect/prepare/execute are logging fine. However I'd also like the user to be able to send warnings/errors/notices into the same logfile. I'd tried a lots of ways to do it but none worked. Does anyone have a good working example of this? My init looks like the following:
my $logfile = "/tmp/sybase_wrapper_xlog_$callerfile"; Log::Log4perl::init(\ qq{ log4perl.logger.DBIx.Log4perl = DEBUG, A1 log4perl.appender.A1 = Log::Log4perl::Appender::File log4perl.appender.A1.filename = $logfile log4perl.appender.A1.mode = append log4perl.appender.A1.layout = Log::Log4perl::Layout::Pattern +Layout log4perl.appender.A1.layout.ConversionPattern=%d [%r] %P %C %p +> %H:%F{1}:%L %M - %m%n });
Then it should be something like this:
my $log = Log::Log4perl->get_logger(); $log->debug("Debug message"); $log->info("Info message"); $log->error("1234 Error message");
But it's not working. Nothing shows up in the logfile, only the messages generated by DBI. Perhaps I am missing something at the get_logger method, which I can't figure out, any suggestions? Thanks!

--
tune

Comment on DBIx::Log4perl -- how to log my own errors
Select or Download Code
Re: DBIx::Log4perl -- how to log my own errors
by mje (Curate) on Jan 04, 2011 at 17:38 UTC

    You need to get a log handle for the same section in you init file as the one DBIx::Log4perl is using which is 'DBIx::Log4perl'. You should also look at dbix_l4p_log in the DBIx::Log4perl documentation. Also, read Log::Log4perl which explains loggers.

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: perlquestion [id://880419]
Approved by Corion
Front-paged by toolic
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others perusing the Monastery: (11)
As of 2015-07-06 21:33 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The top three priorities of my open tasks are (in descending order of likelihood to be worked on) ...









    Results (83 votes), past polls