Branch Coverage

blib/lib/Crypt/PBKDF2.pm
Criterion Covered Total %
branch 30 50 60.0


line true false branch
58 20 0 unless ($class =~ s/^\+//)
109 1023 0 unless defined $salt
111 1 1022 if ($self->has_length_limit and length $password > $self->length_limit)
123 1 1022 if ($self->has_length_limit and length $password > $self->length_limit)
132 0 0 defined $info->{'algorithm_options'} ? :
152 0 1022 if $r
170 0 5053 if ($l > 4294967295 or $l == 4294967295 and $r > 0)
180 9 5044 if ($r)
217 511 511 if ($self->encoding eq 'crypt') { }
511 0 elsif ($self->encoding eq 'ldap') { }
230 0 511 unless (defined $hasher_class and $hasher_class =~ s/^Crypt::PBKDF2::Hash:://)
235 511 0 defined $algo_string ? :
246 0 511 unless (defined $hasher_class and $hasher_class =~ s/^Crypt::PBKDF2::Hash:://)
251 511 0 defined $algo_string ? :
262 511 511 if ($hashed =~ /^\$PBKDF2\$/) { }
511 0 elsif ($hashed =~ /^\{X-PBKDF2}/i) { }
273 0 511 unless ($hashed =~ /^\$PBKDF2\$/)
277 511 0 if (my($algorithm, $opts, $iterations, $salt, $hash) = $hashed =~ /^\$PBKDF2\$([^:}]+)(?:\{([^}]+)\})?:(\d+):([^\$]+)\$(.*)/) { }
293 0 511 unless ($hashed =~ /^\{X-PBKDF2}/i)
297 511 0 if (my($algo_str, $iterations, $salt, $hash) = $hashed =~ /^\{X-PBKDF2}([^:]+):([^:]{6}):([^\$]+):(.*)/i) { }
317 1022 0 if (defined $args) { }
335 1034 0 $self->has_hash_class ? :
1034 0 $self->has_hash_args ? :
0 1034 $self->has_output_len ? :
1033 1 $self->has_lazy_hasher ? :