| line |
true |
false |
branch |
|
15
|
0 |
1 |
unless defined $args{'active'} |
|
16
|
0 |
1 |
if $args{'active'} =~ /\W/ |
|
28
|
2 |
2 |
if ($hash =~ s/ (?<= \A \$) ([\w-]+?)-pepper-([\w-]+) \$ v=1 , id=([^\$,]+) /$1/x) { } |
|
|
0 |
2 |
elsif ($hash =~ s/ (?<= \A \$) peppered-(\w+) \$ v=1 , alg=([^\$,]+) , id=([^\$,]+) /$1/x) { } |
|
39
|
0 |
1 |
unless $self->{'supported_hashes'} |
|
65
|
1 |
1 |
unless my($primary, $type, $id) = _to_inner($hash) |
|
72
|
1 |
1 |
if (my($primary, $type, $id) = _to_inner($hash)) { } |
|
|
1 |
0 |
elsif ($self->{'inner'}->accepts_hash($hash)) { } |
|
73
|
0 |
1 |
unless my $prehashed = eval {
do {
$self->prehash_password($password, $type, $id)
}
} |