blib/lib/Password/Policy.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 13 | 16 | 81.2 |
line | true | false | branch |
---|---|---|---|
55 | 9 | 12 | if (my $parent = delete $$profile{'inherit'}) |
59 | 15 | 42 | if ($key eq 'algorithm') |
63 | 9 | 33 | if ($$rules{$key}) { } |
64 | 9 | 0 | if $$profile{$key} > $$rules{$key} |
100 | 12 | 21 | if $rule eq 'algorithm' |
110 | 0 | 17 | unless ($check) |
124 | 8 | 0 | if ($self->previous) |
126 | 2 | 3 | if $enc_password eq $previous_password |