/ 
Net-SolarWinds-REST-1.18
River stage zero No dependents
/ Net::SolarWinds::LogMethods

NAME

Net::SolarWinds::LogMethods - Passive logging interfcaes

SYNOPSIS

package MyClass;

use base qw(Net::SolarWinds::ConstructorHash  Net::SolarWinds::LogMethods);

1;

my $pkg=new MyClass(key=>'value');

DESCRIPTION

This library provides a common logging interfcaes that expect Net::SolarWinds::Log or something that implements its features. It also assumes object instance is a hash with $self->{log} contains the logging object.

OO Methods provided

  • my $log=$self->get_log;

    Returns the logging object if any

  • $self->set_log(Net::SolarWinds::Log->new);

    Sets the Chater::Log object, you can also set this in the constructor at object creation time.

  • $self->log_error("Some error");

    This is a lazy man's wrapper function for

    my $log=$self->get_log;
$log->log_error("Some error") if $log;

  • $log->log_die("Log this and die");

    Logs the given message then dies.

  • $self->log_always("Some msg");

    This is a lazy man's wrapper function for

    my $log=$self->get_log;
$log->log_always("Some msg") if $log;

  • my $string=$self->log_header;

    This is a stub function that allows a quick addin for logging, the string returned will be inserted after the log_level in the log file if this function is created.

  • $self->log_warn("Some msg");

    This is a lazy man's wrapper function for:

    my $log=$self->get_log;
$log->log_warn("Some msg") if $log;

  • $self->log_info("Some msg");

    This is a lazy man's wrapper function for:

    my $log=$self->get_log;
$log->log_info("Some msg") if $log;

  • $self->log_debug("Some msg");

    This is a lazy man's wrapper function for:

    my $log=$self->get_log;
$log->log_debug("Some msg") if $log;

AUTHOR

Michael Shipper