Manual Reference Pages - LOG::ANY::IFLOG (3)
Log::Any::IfLOG - Load Log::Any only if "logging is enabled"
This document describes version 0.07 of Log::Any::IfLOG (from Perl distribution Log-Any-IfLOG), released on 2015-08-17.
use Log::Any::IfLOG $log;
This module is a drop-in replacement/wrapper for Log::Any to be used from
your modules. This is a quick-hack solution to avoid the cost of loading
Log::Any under normal condition. Since Log::Any 1.00, startup overhead
increases to about 7-10ms on my PC/laptop (from under 1ms for the previous
version). Because I want to keep startup overhead of CLI apps under 50ms (see
Perinci::CmdLine::Lite) to keep tab completion from getting a noticeable lag,
every millisecond counts.
This module will only load Log::Any when logging is enabled. Otherwise, it
will just return without loading anything. If $log is requested in import, a
fake object is returned that responds to methods like debug, is_debug and
so on but will do nothing when called and just return 0.
To determine logging is enabled:
Is $ENABLE_LOG defined?
This package variable can be used to force logging enabled (if true) or
logging disabled (if false). Normally, you dont need to do this except for
Is Log::Any is already loaded (from %INC)?
If Log::Any is already loaded, it means we have taken the overhead hit anyway so
logging is enabled.
Is one of log-related environment variables true?
If one of LOG, TRACE, or DEBUG, or VERBOSE, or QUIET, or
LOG_LEVEL is true then logging is enabled. These variables are used by
Otherwise, logging is disabled.
LOG => bool
TRACE => bool
DEBUG => bool
VERBOSE => bool
QUIET => bool
LOG_LEVEL => str
CW$ENABLE_LOG => bool
This setting can be forced to force loading Log::Any or not.
Please visit the projects homepage at <https://metacpan.org/release/Log-Any-IfLOG>.
Source repository is at <https://github.com/perlancar/perl-Log-Any-IfLOG>.
Please report any bugs or feature requests on the bugtracker website <https://rt.cpan.org/Public/Dist/Display.html?Name=Log-Any-IfLOG>
When submitting a bug or request, please include a test-file or a
patch to an existing test-file that illustrates the bug or desired
COPYRIGHT AND LICENSE
This software is copyright (c) 2015 by firstname.lastname@example.org.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
|perl v5.20.3 ||LOG::ANY::IFLOG (3) ||2015-08-17 |
Visit the GSP FreeBSD Man Page Interface.
Output converted with manServer 1.07.