File Coverage

blib/lib/Acme/Web20/Validator/Rule.pm
Criterion Covered Total %
statement 15 16 93.7
branch n/a
condition n/a
subroutine 5 6 83.3
pod 0 1 0.0
total 20 23 86.9


line stmt bran cond sub pod time code
1             #$Id: Rule.pm,v 1.1 2005/11/14 03:39:09 naoya Exp $
2             package Acme::Web20::Validator::Rule;
3 2     2   14 use strict;
  2         3  
  2         78  
4 2     2   10 use warnings;
  2         5  
  2         71  
5 2     2   11 use base qw (Class::Data::Inheritable Class::Accessor);
  2         4  
  2         1617  
6 2     2   738 use Carp;
  2         5  
  2         136  
7 2     2   1773 use Module::Pluggable search_path => ['Acme::Web20::Validator::Rule'] ;
  2         19664  
  2         14  
8              
9             __PACKAGE__->mk_classdata('name');
10             __PACKAGE__->mk_accessors(qw(is_ok));
11             __PACKAGE__->name(__PACKAGE__);
12              
13             sub validate {
14 0     0 0   croak "this method is abstract";
15             }
16              
17             1;
18              
19             __END__