| line |
true |
false |
branch |
|
71
|
71 |
25 |
if (alias(my(@special) = grep({not defined $_ && exists $reuse{$_};} @_))) |
|
74
|
67 |
4 |
if (alias(my(@new) = grep({defined $_;} @special))) |
|
78
|
3 |
78 |
if (exists $handling{$_}) { } |
|
|
53 |
25 |
elsif (my $reftype = reftype $_) { } |
|
|
2 |
23 |
elsif (exists $reuse{$_}) { } |
|
91
|
35 |
18 |
if ($reftype eq 'ARRAY') { } |
|
|
12 |
6 |
elsif ($reftype eq 'HASH') { } |
|
|
6 |
0 |
elsif ($reftype eq 'SCALAR') { } |
|
95
|
25 |
10 |
unless (exists $reuse{$id}) |
|
149
|
6 |
6 |
unless ($reuse{$id}) |
|
166
|
5 |
1 |
if (defined $scalar) { } |
|
170
|
2 |
3 |
unless ($reuse{$id}) |
|
199
|
39 |
14 |
if $not_void |
|
217
|
8 |
15 |
unless &Internals::SvREADONLY(\$_) |
|
231
|
123 |
4 |
defined $_ ? : |
|
|
82 |
14 |
if $not_void |
|
246
|
1 |
8 |
unless my $reftype = reftype $struct |
|
250
|
2 |
6 |
unless @_ |
|
256
|
1 |
5 |
if ($reftype eq 'HASH') { } |
|
|
5 |
0 |
elsif ($reftype eq 'ARRAY') { } |
|
258
|
0 |
1 |
if keys %hash |
|
269
|
0 |
5 |
if @array |
|
299
|
0 |
3 |
unless my $reftype = reftype $struct |
|
303
|
1 |
2 |
unless @_ |
|
310
|
0 |
2 |
unless @_ |
|
316
|
1 |
1 |
if ($reftype eq 'HASH') { } |
|
|
1 |
0 |
elsif ($reftype eq 'ARRAY') { } |
|
318
|
0 |
1 |
if &Internals::SvREADONLY(\%hash) |
|
328
|
0 |
1 |
if &Internals::SvREADONLY(\@array) |
|
376
|
35 |
0 |
defined $hash{$_} ? : |
|
392
|
120 |
0 |
defined $_ ? : |