1Appender::TestFileCreepUesre(r3)Contributed Perl DocumenAtpapteinodner::TestFileCreeper(3)
2
3
4
6 Log::Log4perl::Appender::TestFileCreeper - Intentionally slow test
7 appender
8
10 use Log::Log4perl::Appender::TestFileCreeper;
11
12 my $app = Log::Log4perl::Appender::TestFileCreeper->new(
13 filename => 'file.log',
14 mode => 'append',
15 );
16
17 $file->log(message => "Log me\n");
18
20 This is a test appender, and it is intentionally slow. It writes out
21 one byte at a time to provoke sync errors. Don't use it, unless for
22 testing.
23
25 Mike Schilli <log4perl@perlmeister.com>, 2003
26
27
28
29perl v5.8.8 2002-07-10 Appender::TestFileCreeper(3)