File Coverage

blib/lib/Log/Any/Adapter/Stdout.pm
Criterion Covered Total %
statement 11 11 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod n/a
total 15 15 100.0


line stmt bran cond sub pod time code
1             package Log::Any::Adapter::Stdout;
2             {
3             $Log::Any::Adapter::Stdout::VERSION = '0.11';
4             }
5 2     2   11 use strict;
  2         3  
  2         79  
6 2     2   10 use warnings;
  2         4  
  2         67  
7 2     2   9 use base qw(Log::Any::Adapter::FileScreenBase);
  2         3  
  2         749  
8              
9             __PACKAGE__->make_logging_methods(
10             sub {
11 2     2   2011 my ( $self, $text ) = @_;
12 2         138 print STDOUT "$text\n";
13             }
14             );
15              
16             1;
17              
18             __END__