File Coverage

blib/lib/FormValidator/LazyWay/Fix.pm
Criterion Covered Total %
statement 18 18 100.0
branch n/a
condition n/a
subroutine 6 6 100.0
pod 0 1 0.0
total 24 25 96.0


line stmt bran cond sub pod time code
1             package FormValidator::LazyWay::Fix;
2              
3 27     27   28024 use strict;
  27         56  
  27         942  
4 27     27   148 use warnings;
  27         53  
  27         849  
5 27     27   204 use Carp;
  27         43  
  27         1794  
6 27     27   1276 use UNIVERSAL::require;
  27         2050  
  27         218  
7 27     27   865 use base qw/FormValidator::LazyWay::Setting/;
  27         55  
  27         3237  
8             __PACKAGE__->mk_accessors(qw/self name/);
9              
10             sub init {
11 42     42 0 97 my $self = shift;
12 42         199 $self->self(__PACKAGE__);
13 42         681 $self->name('fix');
14             }
15              
16             1;