#!/usr/bin/perl
package RVL::Logger;
##LICENSE##
use warnings;
use strict;
#use Carp;
use Sys::Hostname ();
use Sys::Syslog (); # for _PATH_LOG()
=head1 NAME
RVL::Logger - RV Framework logger Module
=head1 SYNOPSIS
=head DESCRIPTION
=cut
use Class::Std::Utils;
{
use define RVL_LOG_EMERG => 0; # System is unusable
use define RVL_LOG_ALERT => 1; # Immediate action required
use define RVL_LOG_CRIT => 2; # Critical conditions
use define RVL_LOG_ERR => 3; # Error conditions
use define RVL_LOG_WARNING => 4; # Warning conditions
use define RVL_LOG_NOTICE => 5; # Normal but significant
use define RVL_LOG_INFO => 6; # Informational
use define RVL_LOG_DEBUG => 7; # Debug-level messages
use define RVL_LOG_TYPE_SYSTEM => 0; # Use system logger
use define RVL_LOG_TYPE_MAIL => 1; # Use mail() function
use define RVL_LOG_TYPE_DEBUG => 2; # Use debugging connection
use define RVL_LOG_TYPE_FILE => 3; # Append to a file
use define RVL_LOG_TYPE_SAPI => 4; # Use the SAPI logging handler
}
1;
Copyright 2K16 - 2K18 Indonesian Hacker Rulez