File Coverage

blib/lib/FormValidator/LazyWay/Rule.pm
Criterion Covered Total %
statement 15 15 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod 0 1 0.0
total 20 21 95.2


line stmt bran cond sub pod time code
1             package FormValidator::LazyWay::Rule;
2              
3 31     31   89250 use strict;
  31         66  
  31         1070  
4 31     31   166 use warnings;
  31         61  
  31         876  
5 31     31   159 use Carp;
  31         1039  
  31         3034  
6              
7 31     31   242 use base qw/FormValidator::LazyWay::Setting/;
  31         65  
  31         10566  
8             __PACKAGE__->mk_accessors(qw/self name/);
9              
10             sub init {
11 48     48 0 97 my $self = shift;
12 48         241 $self->self(__PACKAGE__);
13 48         690 $self->name('rule');
14             }
15              
16             1;