From: Lars T. <la...@th...> - 2002-11-01 20:01:28
|
Sounds to me like we need to be able to supply the syslog level in the configuration. The current behaviour definitely violates the PoLA (Principle of Least Astonishment). /Lars ----- Original Message ----- From: "Kevin Goess" <ke...@go...> Cc: <log...@li...> Sent: Friday, November 01, 2002 6:27 PM Subject: Re: [log4perl-devel] Using log4Perl and LOG::Log::Dispatch::Syslog appender. Hey, Mike, when we call Log::Dispatch, we're sending it a message of level 0 (DEBUG), wouldn't it make more sense to send it a 9 or something, which means that log4perl messages would ALWAYS get through instead of SOMETIMES depending on how the underlying appender system is set up? Check out Logger.pm line 205-210 Manuel de Vega Barreiro wrote: > I have problem configuring syslog appender (Log-Dispatch-2.01) to work > with Log4Perl(Log-Log4perl-0.25). > > I use these script and config file: > script > ------------------------------------------------ > #! /usr/local/bin/perl > use strict; > > use Log::Log4perl qw(get_logger :levels); > Log::Log4perl::init('log4perl.conf'); > > > my $logger = get_logger(""); > > > $logger->level($INFO); > print "Ahora con nivel ERROR\n"; > $logger->info("principal INFO"); > $logger->error("principal ERROR"); > ------------------------------------------------- > > config file > ------------------------------------------------- > log4j.rootLogger = ERROR, B1, A1 > > log4j.appender.A1=Log::Dispatch::Screen > log4j.appender.A1.layout=org.apache.log4j.PatternLayout > log4j.appender.A1.layout.ConversionPattern=%d [%t] %-5p %c - %m%n > > log4j.appender.B1 = Log::Dispatch::Syslog > log4j.appender.B1.layout = Log::Log4perl::Layout::SimpleLayout > log4j.appender.B1.name = file1 > log4j.appender.B1.min_level = error > log4j.appender.B1.ident = prueba > log4j.appender.B1.level = error > log4j.appender.B1.facility = local1 > log4j.appender.B1.socket = inet > ------------------------------------------------- > > I have tried a simple script using only > Syslog daemon and Log-Dispatch-2.01: > ------------------------------------------------ > #! /usr/local/bin/perl > > use Log::Dispatch::Syslog; > > my $file = Log::Dispatch::Syslog->new( name => 'file1', > min_level => 'info', > socket => 'inet', > facility => 'local1', > ident => 'prueba' ); > > $file->log( level => "error", message => "un mensajito 3" ); > -------------------------------------------------------- > that work fine, so I think something is wrong in log4perl config > file. > > Anyone can help me? > > Thanks > > -- > -------------------------------------------------------------------------- ---- > p.d. (Only for future Spanish Translators) > Te animas con alguna de las ayudas de gnome-core, gnome-applets o > gnome-utils? > http://www.linuxlots.com/~barreiro/spanish/gnome-es/v1.4/gnome-es-ayudas-1.4 .html > > Manuel de Vega Barreiro. mba...@re... En un lugar de la > red > Madrid. España. usuario linux: 17.419, 62.146 de cuyo nombre no > quiero > http://www.linuxlots.com/~barreiro Linux Landia acordarme.......... > -------------------------------------------------------------------------- ---- > > > > ------------------------------------------------------- > This sf.net email is sponsored by: See the NEW Palm > Tungsten T handheld. Power & Color in a compact size! > http://ads.sourceforge.net/cgi-bin/redirect.pl?palm0001en > _______________________________________________ > log4perl-devel mailing list > log...@li... > https://lists.sourceforge.net/lists/listinfo/log4perl-devel -- Happy Trails . . . Kevin M. Goess (and Anne and Frank) 904 Carmel Ave. Albany, CA 94706 (510) 525-5217 ------------------------------------------------------- This sf.net email is sponsored by: See the NEW Palm Tungsten T handheld. Power & Color in a compact size! http://ads.sourceforge.net/cgi-bin/redirect.pl?palm0001en _______________________________________________ log4perl-devel mailing list log...@li... https://lists.sourceforge.net/lists/listinfo/log4perl-devel |