File Coverage

blib/lib/ESPPlus/Storage/Writer.pm
Criterion Covered Total %
statement 13 13 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod 1 1 100.0
total 18 18 100.0


line stmt bran cond sub pod time code
1             package ESPPlus::Storage::Writer;
2 6     6   96 use 5.006;
  6         18  
  6         216  
3 6     6   32 use strict;
  6         9  
  6         178  
4 6     6   217 use warnings;
  6         13  
  6         442  
5              
6             sub new {
7 2     2 1 1516 my $class = shift;
8 2         5 my $p = shift;
9 2         11 my $self = bless { %$p }, $class;
10            
11 2         9 return $self;
12             }
13              
14             1;
15              
16             __END__