
Fault::Delegate::Stderr - Stderr print logger delegate.

use Fault::Delegate::Stderr; $self = Fault::Delegate::Stderr->new; $okay = $self->log ($msg); $bool = $self->test;

UNIVERSAL
Fault::Delegate
Fault::Delegate::Stderr

This is a Logger delegate that writes all the log messages to stderr. It is Logger's default delegate if no other is given. It is also a pretty good one to start with when you are trying to understand how this system works.
It satisfies the absolute minimum requirements of the Fault::Delegate logger delegate protocol.

use Fault::Delegate::Stderr;
use Fault::Logger;
use Fault::Msg;
my $msg = Fault::Msg ("Arf!");
my $baz = Fault::Delegate::Stderr->new ("/tmp/mylogfile");
my $waslogged = $baz->log ($msg);
Fault::Logger->new ($baz);
my $waslogged = Fault::Logger->log ("Bow! Wow!");

None.

Create a logger delegate object that prints log messages to stderr. Prints a warning message and returns undef on failure.

Print a time-stamped message to stderr using information taken from Fault::Msg object $msg in the format:
$date $time UTC> $process: $type($priority): $msg\n
for example:
20021207 223010 UTC> MyProcess: NOTE(notice): Nothing happened today.\n
Return true if the message was printed.

None.

If the debug level has been set to at least one in Fault::DebugPrinter, it executes the test method of the parent, Fault::Delegate class. Otherwise it always returns true. This was added so that an annoying initial message from the Fault system will not be printed on a terminal unless it is actually wanted for debugging purposees.
Impliments the above override to the internal family protocol utilized by the Fault:Delegate log and test methods.

Local warning messages are issued if the sys logger cannot be reached or has any problems whatever.

See TODO.

Fault::Logger, Fault::Delegate, Fault::Msg

Dale Amon <amon@vnl.com>