Beefy Boxes and Bandwidth Generously Provided by pair Networks
Clear questions and runnable code
get the best and fastest answer
 
PerlMonks  

Re^5: Import constants?

by almut (Canon)
on Aug 05, 2010 at 09:15 UTC ( #853083=note: print w/ replies, xml ) Need Help??


in reply to Re^4: Import constants?
in thread Import constants?

Could you show the exact code that produces the problem?

With the following test I can't replicate the issue:

#!/usr/bin/perl -l use DBIx::Log4perl qw(:masks); $DBIx::Log4perl::LogMask = DBIX_L4P_LOG_OUTPUT | DBIX_L4P_LOG_INPUT; print $DBIx::Log4perl::LogMask;

(prints '3', as expected)


Comment on Re^5: Import constants?
Download Code
Re^6: Import constants?
by DreamT (Pilgrim) on Aug 05, 2010 at 09:31 UTC
    I used:
    use DBIx::Log4perl qw(:masks); $DBIx::Log4perl::LogMask = DBIX_L4P_LOG_OUTPUT | DBIX_L4P_LOG_INPUT; Log::Log4perl->init("myconfig.cfg"); $dbh = DBIx::Log4perl->connect($DSN, "user", "pass");
    Config-file:
    log4perl.logger = FATAL, LOGFILE log4perl.appender.LOGFILE=Log::Log4perl::Appender::File log4perl.appender.LOGFILE.filename=logs/FATAL.TXT log4perl.appender.LOGFILE.mode=append log4perl.appender.LOGFILE.Threshold = ERROR log4perl.appender.LOGFILE.layout=PatternLayout log4perl.appender.LOGFILE.layout.ConversionPattern=[%r] %F %L %c - %m% +n log4perl.logger.DBIx.Log4perl=DEBUG, A1 log4perl.appender.A1=Log::Log4perl::Appender::File log4perl.appender.A1.filename=logs/OK.txt log4perl.appender.A1.mode=append log4perl.appender.A1.layout=Log::Log4perl::Layout::SimpleLayout

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://853083]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others lurking in the Monastery: (13)
As of 2014-09-19 14:09 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    How do you remember the number of days in each month?











    Results (140 votes), past polls