File Coverage

blib/lib/Log/ger/Output/Null.pm
Criterion Covered Total %
statement 7 7 100.0
branch n/a
condition n/a
subroutine 6 6 100.0
pod 0 2 0.0
total 13 15 86.6


line stmt bran cond sub pod time code
1             ## no critic: TestingAndDebugging::RequireUseStrict
2             package Log::ger::Output::Null;
3              
4             our $AUTHORITY = 'cpan:PERLANCAR'; # AUTHORITY
5             our $DATE = '2022-06-10'; # DATE
6             our $DIST = 'Log-ger'; # DIST
7             our $VERSION = '0.040'; # VERSION
8              
9             sub meta { +{
10 1     1 0 3 v => 2,
11             } }
12              
13             sub get_hooks {
14             return {
15             create_outputter => [
16             __PACKAGE__, # key
17             50, # priority
18             sub { # hook
19 6     6   15 my %hook_args = @_; # see Log::ger::Manual::Internals/"Arguments passed to hook"
20              
21 6         7 $Log::ger::_outputter_is_null = 1;
22 6     3   15 my $outputter = sub {0};
  3     3   755  
        3      
23 6         14 [$outputter];
24 1     1 0 7 }],
25             };
26             }
27              
28             1;
29             # ABSTRACT: Null output
30              
31             __END__