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             package Log::ger::Output::Null;
2              
3             our $AUTHORITY = 'cpan:PERLANCAR'; # AUTHORITY
4             our $DATE = '2020-03-11'; # DATE
5             our $DIST = 'Log-ger'; # DIST
6             our $VERSION = '0.037'; # VERSION
7              
8             sub meta { +{
9 1     1 0 3 v => 2,
10             } }
11              
12             sub get_hooks {
13             return {
14             create_outputter => [
15             __PACKAGE__, # key
16             50, # priority
17             sub { # hook
18 6     6   14 my %hook_args = @_; # see Log::ger::Manual::Internals/"Arguments passed to hook"
19              
20 6         7 $Log::ger::_outputter_is_null = 1;
21 6     3   16 my $outputter = sub {0};
  3     3   683  
        3      
22 6         16 [$outputter];
23 1     1 0 8 }],
24             };
25             }
26              
27             1;
28             # ABSTRACT: Null output
29              
30             __END__