File Coverage

blib/lib/Input/Validator/Base.pm
Criterion Covered Total %
statement 11 12 91.6
branch n/a
condition n/a
subroutine 3 4 75.0
pod 0 2 0.0
total 14 18 77.7


line stmt bran cond sub pod time code
1             package Input::Validator::Base;
2              
3 22     22   116 use strict;
  22         45  
  22         662  
4 22     22   98 use warnings;
  22         38  
  22         2276  
5              
6             sub new {
7 135     135 0 1731 my $class = shift;
8              
9 135         355 my $self = {@_};
10 135         329 bless $self, $class;
11              
12 135         595 $self->BUILD;
13              
14 135         382 return $self;
15             }
16              
17 0     0 0   sub BUILD {
18             }
19              
20             1;