File Coverage

blib/lib/Log/ger/Format/Flogger.pm
Criterion Covered Total %
statement 14 14 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod 0 1 0.0
total 19 20 95.0


line stmt bran cond sub pod time code
1             package Log::ger::Format::Flogger;
2              
3             our $DATE = '2019-10-27'; # DATE
4             our $VERSION = '0.003'; # VERSION
5              
6 1     1   79050 use strict;
  1         10  
  1         29  
7 1     1   6 use warnings;
  1         2  
  1         27  
8              
9 1     1   428 use String::Flogger qw(flog);
  1         16500  
  1         6  
10              
11             sub get_hooks {
12 1     1 0 14 my %conf = @_;
13              
14             return {
15             create_formatter => [
16             __PACKAGE__, # key
17             50, # priority
18             sub { # hook
19 2     2   2577 my %hook_args = @_;
20              
21 2         5 my $formatter = \&flog;
22 2         7 [$formatter];
23 1         8 }],
24             };
25             }
26              
27             1;
28             # ABSTRACT: Use String::Flogger for formatting instead of sprintf
29              
30             __END__