blib/lib/Crypt/Passphrase/Pepper/Base.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 10 | 14 | 71.4 |
line | true | false | branch |
---|---|---|---|
15 | 0 | 1 | unless defined $args{'active'} |
16 | 0 | 1 | if $args{'active'} =~ /\W/ |
28 | 2 | 2 | unless $hash =~ s/ (?<= \A \$) peppered-(\w+) \$ v=1 , alg=([^\$,]+) , id=([^\$,]+) /$1/x |
50 | 1 | 1 | unless my($primary, $type, $id) = _to_inner($hash) |
57 | 1 | 1 | if (my($primary, $type, $id) = _to_inner($hash)) { } |
1 | 0 | elsif ($self->{'inner'}->accepts_hash($hash)) { } | |
58 | 0 | 1 | unless my $prehashed = eval { do { $self->prehash_password($password, $type, $id) } } |