File Coverage

blib/lib/Password/Policy/Exception/InsufficientUppercase.pm
Criterion Covered Total %
statement 10 10 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod 0 1 0.0
total 14 15 93.3


line stmt bran cond sub pod time code
1             package Password::Policy::Exception::InsufficientUppercase;
2             $Password::Policy::Exception::InsufficientUppercase::VERSION = '0.04';
3 2     2   7 use strict;
  2         3  
  2         60  
4 2     2   6 use warnings;
  2         4  
  2         41  
5              
6 2     2   6 use parent 'Password::Policy::Exception';
  2         2  
  2         8  
7              
8 5     5 0 27 sub error { return "The specified password did not have enough uppercase ASCII characters"; }
9              
10             1;
11              
12             __END__