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();
    my $log = $logger->get_logger(__PACKAGE__);
    $log->error('error');
    $log->info('info');

DESCRIPTION

This module is a wrapper around Log::Log4perl.

SEE ALSO

  Log::Log4perl

Make appender_thresholds_adjust return number of appenders changed:

  https://rt.cpan.org/Ticket/Display.html?id=43426

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.