Branch Coverage

blib/lib/Data/Reuse.pm
Criterion Covered Total %
branch 51 62 82.2


line true false branch
70 70 26 if (alias(scalar(my(@special) = grep({not defined $_ && exists $reuse{$_};} @_))))
73 66 4 if (alias(scalar(my(@new) = grep({defined $_;} @special))))
77 3 77 if (exists $handling{$_}) { }
52 25 elsif (my $reftype = builtin::reftype($_)) { }
2 23 elsif (exists $reuse{$_}) { }
90 34 18 if ($reftype eq 'ARRAY') { }
12 6 elsif ($reftype eq 'HASH') { }
6 0 elsif ($reftype eq 'SCALAR') { }
94 25 9 unless (exists $reuse{$id})
148 6 6 unless ($reuse{$id})
165 5 1 if (defined $scalar) { }
169 2 3 unless ($reuse{$id})
195 38 14 if $not_void
213 8 15 unless &Internals::SvREADONLY(\$_)
227 123 4 defined $_ ? :
82 14 if $not_void
242 1 8 unless my $reftype = builtin::reftype($struct)
246 2 6 unless @_
252 1 5 if ($reftype eq 'HASH') { }
5 0 elsif ($reftype eq 'ARRAY') { }
254 0 1 if keys %hash
265 0 5 if @array
295 0 3 unless my $reftype = builtin::reftype($struct)
299 1 2 unless @_
306 0 2 unless @_
312 1 1 if ($reftype eq 'HASH') { }
1 0 elsif ($reftype eq 'ARRAY') { }
314 0 1 if &Internals::SvREADONLY(\%hash)
324 0 1 if &Internals::SvREADONLY(\@array)
373 35 0 defined $hash{$_} ? :
388 118 0 defined $_ ? :