Branch Coverage

blib/lib/Crypt/DRBG.pm
Criterion Covered Total %
branch 52 62 83.8


line true false branch
90 0 16 unless my $fh = 'IO::File'->new($source, 'r')
94 0 16 if length $data != $len
105 5400 68 if (defined $params->{$name} and not ref $params->{$name}) { }
110 20 48 if ref $params->{$name} eq 'CODE'
111 14 54 if $params->{$autoname} or $params->{'auto'}
112 34 34 unless ($seedfunc)
113 2 32 unless $optional
129 2688 45 if (defined $params->{$name} and not ref $params->{$name}) { }
134 2 43 if ref $params->{$name} eq 'CODE'
135 9 36 if ($params->{$autoname} or $params->{'auto'})
137 0 0 if defined $params->{'version'} and $params->{'version'}
151 34 11 unless $seedfunc
163 6 5431 if defined $pid and $pid != $$
164 0 5437 if $self->{'reseed_counter'} >= $self->{'reseed_interval'}
166 6 5431 if ($reseed)
167 0 6 unless $self->{'seedfunc'}
169 6 0 if $self->{'fork_safe'}
185 2 2731 if ($params{'cache'})
191 7 2726 if $params{'auto'} and not defined $params{'fork_safe'}
192 17 2716 if $self->{'fork_safe'}
212 5431 73 if not defined $self->{'cache'} or defined $seed
217 2 71 unless length $$cache
219 4 73 $left > length $$cache ? :
222 4 73 unless length $$cache
247 1 2 unless defined $n
248 2 1 unless defined $num
252 2 1 $single ? :
271 0 0 $len <= 65536 ? :
6 0 $len <= 256 ? :
277 4 2 if ($len & $len - 1) { }
315 2 1 if ($len & $len - 1)