File Coverage

lib/Context/Singleton/Exception/Invalid.pm
Criterion Covered Total %
statement 9 11 81.8
branch n/a
condition n/a
subroutine 3 4 75.0
pod 1 1 100.0
total 13 16 81.2


line stmt bran cond sub pod time code
1              
2 3     3   24 use strict;
  3         11  
  3         95  
3 3     3   16 use warnings;
  3         6  
  3         161  
4              
5             package Context::Singleton::Exception::Invalid;
6              
7             our $VERSION = v1.0.4;
8              
9 3     3   1791 use Exception::Class ( __PACKAGE__ );
  3         27251  
  3         47  
10              
11             sub new {
12 0     0 1   my ($self, @params) = @_;
13              
14 0           $self->SUPER::new (error => 'Invalid value', @params);
15             }
16              
17             1;
18