NAME

Fault::Delegate::Syslog - Syslog delegate.

SYNOPSIS

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

Inheritance

UNIVERSAL
  Fault::Delegate
    Fault::Delegate::Syslog

Description

This is a delegate that writes log messages to the syslog. Syslogging must be accessible to the calling program.

Fault::Delegate::Syslog satisfies the minimum requirements of the Fault::Delegate logger delegate protocol.

Examples

use Fault::Delegate::Syslog;
use Fault::Msg;
use Fault::Logger;

my $msg       = Fault::Msg                   ("Arf!");
my $baz       = Fault::Delegate::Syslog->new;
my $waslogged = $baz->log                    ($msg);

                Fault::Logger->new           ($baz);
my $waslogged = Fault::Logger->log           ("Bow! Wow!");

[See Fault::Logger for a detailed example.]

Instance Variables

init     True if a syslog connection was succesfully initialized.

Class Methods

$delegate = Fault::Delegate::Syslog->new

Create a logger delegate object that writes log messages to syslog. A warning is issued if the program cannot initialize and write a startup message to syslog.

Returns undef if it fails to set up the syslog connection.

Logger Protocol Instance Methods

$didlog = $self->log ($msgobj)

Send the information contained in $msgobj to syslog at the $priority contained by it and return true if we succeeded in doing so. The message is formatted so that it will appear in the log like this:

Apr 17 18:00:36 localhost UnspecifiedProcess[12638]: NOTE(notice): Testing syslogger again

Private Class Methods

None.

Private Instance Methods

$bool = $self->_write ($msg)

$bool = $self->_connect

Impliments the above overrides to the internal family protocol utilized by the Fault:Delegate log and test methods.

Errors and Warnings

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

KNOWN BUGS

See TODO.

SEE ALSO

Fault::Logger, Fault::Delegate, Fault::Msg, Sys::Syslog Fault::ErrorHandler

AUTHOR

Dale Amon <amon@vnl.com>