line |
true |
false |
branch |
31
|
0 |
3 |
if ref $class |
36
|
0 |
3 |
unless $minlen =~ /^\d+$/ and $minlen >= 0 |
37
|
0 |
3 |
unless $maxlen =~ /^\d+$/ and $maxlen >= $minlen |
38
|
2 |
1 |
unless $psym > 0 |
53
|
0 |
18 |
unless ref $self and eval {
do {
$self->isa('Data::Password::BasicCheck')
}
} |
59
|
1 |
17 |
if $plen < $minlen |
60
|
1 |
16 |
if $plen > $maxlen |
64
|
1 |
15 |
if $result eq 0 |
68
|
0 |
15 |
unless $segments > 1 |
73
|
3 |
44 |
if $result eq 0 |
86
|
27 |
22 |
unless /[a-z]/i and /\d/ and /[^a-z0-9]/i |
98
|
2 |
20 |
unless scalar keys %unique >= sprintf('%.0f', $psym * $plen) |
105
|
0 |
101 |
if $rot eq $password |
128
|
20 |
60 |
if (/\s/) |
139
|
337 |
37 |
$chunklen >= $minlen ? : |
142
|
16 |
358 |
unless ($idx == -1) |