File Coverage

blib/lib/Exception/Reporter/Dumper.pm
Criterion Covered Total %
statement 9 11 81.8
branch 1 2 50.0
condition 0 3 0.0
subroutine 3 4 75.0
pod 0 2 0.0
total 13 22 59.0


line stmt bran cond sub pod time code
1 2     2   818 use strict;
  2         11  
  2         130  
2 2     2   11 use warnings;
  2         4  
  2         311  
3             package Exception::Reporter::Dumper 0.015;
4             # ABSTRACT: something that dumps values into records
5              
6             sub new {
7 3     3 0 18901 my $class = shift;
8              
9 3 50       14 Carp::confess("$class constructor does not take any parameters") if @_;
10              
11 3         32 return bless {}, $class;
12             }
13              
14             sub dump {
15 0   0 0 0   my $class = ref $_[0] || $_[0];
16 0           Carp::confess("$class does not implement required Exception::Reporter::Dumper method 'dump'");
17             }
18              
19             1;
20              
21             __END__