Searched +refs:logger +refs:enable (Results 1 - 25 of 41) sorted by relevance

12

/macosx-10.10.1/CPANInternal-159.1/Log-Log4perl-1.40/t/
H A D025CustLevels.t10 Log::Log4perl::InternalDebug->enable();
100 # check a category logger
102 my $logger = Log::Log4perl->get_logger("groceries.beer");
103 $logger->warn("this is a warning message");
104 $logger->litewarn("this is a LITE warning message (2/3 the calories)");
105 $logger->info("this info message should not log");
116 # check the root logger
118 $logger->warn("this is a rootlevel warning message");
119 $logger->litewarn("this is a rootlevel LITE warning message (2/3 the calories)");
120 $logger
[all...]
H A D059Wrapper.t6 Log::Log4perl::InternalDebug->enable();
60 my $logger;
62 $logger = get_logger();
63 is $logger->{category}, "main", "imported get_logger()";
65 $logger = get_logger( $pkg );
66 is $logger->{category}, $pkgcat, "imported get_logger($pkg)";
78 $logger = $func->();
79 is $logger->{category}, "main", "$class\::()";
81 $logger = $func->( $pkg );
82 is $logger
[all...]
H A D054Subclass.t9 Log::Log4perl::InternalDebug->enable();
28 my $logger = Mylogger->get_logger("Waah");
29 is($logger->{category}, "Waah", "subclass category rt #32942");
H A D003Layout-Rr.t6 Log::Log4perl::InternalDebug->enable();
38 my $logger = create_logger();
42 $logger->info("Start");
45 $logger->debug("Pause: 1 sec");
48 $logger->info("Pause: 2 secs");
51 $logger->debug("Pause: 1 sec");
53 $logger->warn("End");
112 # log4perl.logger.test = ALL, A, B
126 my $logger = Log::Log4perl->get_logger("test");
127 $logger
[all...]
H A D008ConfCat.t9 Log::Log4perl::InternalDebug->enable();
30 # Test a 'foo.bar.baz' logger which inherits level from foo.bar
37 my $logger = Log::Log4perl->get_logger("foo.bar.baz");
38 $logger->debug("Gurgel");
44 # Test the root logger via inheritance (discovered by Kevin Goess)
52 $logger = Log::Log4perl->get_logger("foo");
53 $logger->debug("Gurgel");
H A D009Deuce.t10 Log::Log4perl::InternalDebug->enable();
29 # Test the root logger on a configuration file defining a file appender
33 my $logger = Log::Log4perl->get_logger("");
34 $logger->debug("Gurgel");
42 # Test the root logger via inheritance (discovered by Kevin Goess)
49 $logger = Log::Log4perl->get_logger("foo");
50 $logger->debug("Gurgel");
H A D003Layout.t9 Log::Log4perl::InternalDebug->enable();
34 my $logger = Log::Log4perl->get_logger("abc.def.ghi");
35 $logger->level($DEBUG);
36 $logger->add_appender($app);
41 $logger->debug("That's the message");
54 $logger->debug("That's the message");
64 $logger->debug("That's the message");
74 $logger->debug("That's the message");
91 $logger->debug("That's the message");
99 $logger
[all...]
H A D028Additivity.t9 Log::Log4perl::InternalDebug->enable();
28 # Define the root logger and another logger, additivity on
31 log4perl.logger = INFO, A1
32 log4perl.logger.Twix.Bar = DEBUG, A2
39 my $logger = get_logger("Twix::Bar");
40 $logger->info("Percolate this!");
51 # Define the root logger and another logger, additivity off
54 log4perl.logger
[all...]
H A D005Config-Perl.t9 Log::Log4perl::InternalDebug->enable();
33 my $logger = Log::Log4perl->get_logger("");
35 $logger->debug("Gurgel");
52 $logger = Log::Log4perl->get_logger("");
54 $logger->debug("Gurgel");
H A D006Config-Java.t9 Log::Log4perl::InternalDebug->enable();
47 my $logger = Log::Log4perl->get_logger("");
50 push @lines, $line++; $logger->debug("Gurgel");
51 push @lines, $line++; $logger->info("Gurgel");
52 push @lines, $line++; $logger->warn("Gurgel");
53 push @lines, $line++; $logger->error("Gurgel");
54 push @lines, $line++; $logger->fatal("Gurgel");
H A D007LogPrio.t9 Log::Log4perl::InternalDebug->enable();
36 my $logger = Log::Log4perl->get_logger("");
39 push @lines, $line++; $logger->debug("Gurgel");
40 push @lines, $line++; $logger->info("Gurgel");
41 push @lines, $line++; $logger->warn("Gurgel");
42 push @lines, $line++; $logger->error("Gurgel");
43 push @lines, $line++; $logger->fatal("Gurgel");
H A D015fltmsg.t10 Log::Log4perl::InternalDebug->enable();
36 my $logger = Log::Log4perl->get_logger("");
37 $logger->debug("Chunk1", "Chunk2", "Chunk3");
54 $logger = Log::Log4perl->get_logger("");
55 $logger->debug("Chunk1", "Chunk2", "Chunk3");
73 $logger = Log::Log4perl->get_logger("");
74 $logger->debug("Chunk1", "Chunk2", "Chunk3");
91 $logger = Log::Log4perl->get_logger("");
92 $logger->debug("Chunk1", "Chunk2", "Chunk3", "Chunk4");
116 $logger
[all...]
H A D055AppDestroy.t10 Log::Log4perl::InternalDebug->enable();
46 my $logger = get_logger();
47 $logger->debug("foo");
H A D040Filter.t9 Log::Log4perl::InternalDebug->enable();
25 log4perl.logger.Some = INFO, A1
34 # Define a logger
35 my $logger = Log::Log4perl->get_logger("Some.Where");
38 $logger->info("Here's the info, let this through!");
41 $logger->info("Here's the info, suppress this!");
53 log4perl.logger.Some = INFO, A1
65 # Define a logger
66 $logger = Log::Log4perl->get_logger("Some.Where");
69 $logger
[all...]
H A D024WarnDieCarp.t21 Log::Log4perl::InternalDebug->enable();
102 # Get a logger and use it without having called init() first
168 my $logger = get_logger("Twix::Bar");
171 eval { $logger->logdie("Log and die!"); };
191 my $logger = get_logger("Twix::Bar");
193 $logger->logcroak("Inferno!");
196 my $logger = get_logger("Twix::Bar");
198 $logger->logdie("Inferno!");
223 my $logger = get_logger("Twix::Bar");
225 $logger
[all...]
H A D022Wrap.t9 Log::Log4perl::InternalDebug->enable();
31 # want anybody to do, but just to have a test case for a logger in a
121 my $logger = L4p::Wrapper::get_logger();
122 is $logger->{category}, "main", "cat on () is main";
124 $logger = L4p::Wrapper::get_logger(__PACKAGE__);
125 is $logger->{category}, "main", "cat on (__PACKAGE__) is main";
127 $logger = L4p::Wrapper->get_logger();
128 is $logger->{category}, "main", "cat on ->() is main";
131 # print Dumper($logger);
H A D046RRDs.t9 Log::Log4perl::InternalDebug->enable();
47 my $logger = get_logger();
50 $logger->info($_);
H A D021AppThres.t9 Log::Log4perl::InternalDebug->enable();
50 # Root logger's appender
95 log4perl.logger = ERROR, BUF0
96 log4perl.logger.a = INFO, BUF1
126 log4j.logger = ERROR, BUF0
127 log4j.logger.a = INFO, BUF1
153 log4j.logger = ERROR, BUF0
154 log4j.logger.a = INFO, BUF1
192 my $logger = get_logger("");
194 $logger
[all...]
H A D029SysWide.t9 Log::Log4perl::InternalDebug->enable();
33 log4perl.logger.a = INFO, BUF0
57 log4perl.logger = ERROR, BUF0
58 log4perl.logger.a = INFO, BUF1
97 my $logger = get_logger();
98 $logger->info("Blah");
119 $logger = get_logger();
120 $logger->warn("Blah");
H A D053Resurrect.t9 Log::Log4perl::InternalDebug->enable();
29 log4perl.logger = DEBUG, A1
H A D045Composite.t9 Log::Log4perl::InternalDebug->enable();
59 my $logger = get_logger("");
60 $logger->warn("This message will be sent immediately");
61 $logger->warn("This message will be delayed by one hour.");
88 $logger = get_logger("");
89 $logger->warn("This message will be queued but discarded on flush.");
118 $logger = get_logger("");
119 $logger->warn("This message will be sent immediately");
121 $logger->warn("This message will be discarded");
155 $logger
[all...]
H A D016Export.t10 Log::Log4perl::InternalDebug->enable();
34 # Init logger
39 my $logger = get_logger("abc.def");
40 $logger->add_appender($app);
41 $logger->level($DEBUG);
43 # Let the next logger assume the default category,
52 # Use logger
61 # Use other logger
70 # Use main logger
79 # Use other logger
[all...]
H A D035JDBCAppender.t12 Log::Log4perl::InternalDebug->enable();
72 #calculated at runtime and fed to the $logger->whatever(...)
110 # check a category logger
112 my $logger = Log::Log4perl->get_logger("groceries.beer");
114 #$logger->fatal('fatal message',1234,'foo','bar');
115 $logger->fatal('fatal message',1234,'foo', 'bar');
116 $logger->warn('warning message',3456,'foo','bar');
117 $logger->debug('debug message',99,'foo','bar');
H A D050Buffer.t9 Log::Log4perl::InternalDebug->enable();
68 my $logger = Log::Log4perl->get_logger('triggertest');
69 $logger->debug("This message gets buffered.");
72 $logger->info("This message gets buffered also.");
75 $logger->error("This message triggers a buffer flush.");
H A D004Config.t9 Log::Log4perl::InternalDebug->enable();
31 # Test the root logger on a configuration file defining a file appender
35 my $logger = Log::Log4perl->get_logger("");
36 $logger->debug("Gurgel");
40 qr#^\d+\s+\[N/A\] DEBUG N/A - Gurgel$#, "Root logger");
43 # Test the root logger via inheritance (discovered by Kevin Goess)
49 $logger = Log::Log4perl->get_logger("foo");
50 $logger->debug("Gurgel");
53 qr#^\d+\s+\[N/A\] DEBUG foo N/A - Gurgel$#, "Root logger inherited");
67 $logger
[all...]

Completed in 159 milliseconds

12