File Coverage

blib/lib/FormValidator/Simple/Exception.pm
Criterion Covered Total %
statement 3 6 50.0
branch n/a
condition n/a
subroutine 1 2 50.0
pod 0 1 0.0
total 4 9 44.4


line stmt bran cond sub pod time code
1             package FormValidator::Simple::Exception;
2 28     28   137 use strict;
  28         52  
  28         2398  
3              
4             sub throw {
5 0     0 0   my ($self, $msg) = @_;
6 0           require Carp;
7 0           Carp::croak($msg);
8             }
9              
10             1;
11             __END__