The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Parse::Dia::SQL::Logger - Wrapper for Log::Log4perl

SYNOPSIS

    use Parse::Dia::SQL::Logger;
    my $logger = Parse::Dia::SQL::Logger::->new(loglevel => 'INFO');
    my $log = $logger->get_logger(__PACKAGE__);
    $log->error('error');
    $log->info('info');

DESCRIPTION

This module is a wrapper around Log::Log4perl.

new

The constructor.

get_logger

  Return logger singleton object.

log_off

Decrease log level on all appenders. 1

log_on

Increase log level on all appenders.