line |
true |
false |
branch |
53
|
0 |
0 |
if (exists &Carp::confess) { } |
96
|
0 |
0 |
unless ($obj->{'flags'} & 16) |
109
|
0 |
0 |
unless ($obj->{'flags'} & 1) |
118
|
0 |
0 |
unless ($obj->{'flags'} & 4) |
127
|
0 |
0 |
unless ($obj->{'flags'} & 8) |
136
|
0 |
0 |
$obj->{'type'} == 1 ? : |
141
|
0 |
0 |
if ($obj->{'flags'} & 1) |
144
|
0 |
0 |
if ($obj->{'flags'} & 4) |
158
|
0 |
0 |
if ($type == 0) { } |
|
0 |
0 |
elsif ($type == 1) { } |
|
0 |
0 |
elsif ($type == 2) { } |
|
0 |
0 |
elsif ($type == 3) { } |
173
|
0 |
0 |
if $flags & 1 |
174
|
0 |
0 |
if $flags & 4 |
175
|
0 |
0 |
if $flags & 8 |
176
|
0 |
0 |
if $flags & 16 |
177
|
0 |
0 |
if $flags & 32 |
178
|
0 |
0 |
if $flags & 64 |
179
|
0 |
0 |
unless @flags |
188
|
0 |
0 |
if ($type == 1 or $flags & 1) { } |
|
0 |
0 |
elsif ($type == 2 or $flags & 4) { } |
207
|
0 |
0 |
if ($expr =~ /[ a-dfzA-DF-Z]/) { } |
211
|
0 |
0 |
if $sval eq '0' and $expr |
217
|
0 |
0 |
if $unsigned |
223
|
0 |
0 |
if ($expr =~ /^-?(Inf|NaN)$/i) { } |
|
0 |
0 |
elsif ($expr =~ /[ a-dfzA-DF-Z]/) { } |
225
|
0 |
0 |
if $sval eq '0' and $expr |
231
|
0 |
0 |
if $sval eq '0' and $expr |
241
|
0 |
0 |
if ($obj->{'type'} == 1) { } |
264
|
0 |
0 |
if $extra_flags & 1 |
265
|
0 |
0 |
if $extra_flags & 4 |
285
|
0 |
0 |
if ($obj->{'flags'} & 4) { } |
325
|
0 |
0 |
if $flags & 16 |
326
|
0 |
0 |
if ($flags & 1) { } |
|
0 |
0 |
elsif ($flags & 4) { } |
|
0 |
0 |
elsif ($flags & 8) { } |
327
|
0 |
0 |
if ($flags & 2) { } |
359
|
0 |
0 |
if (ref $sv eq 'B::SPECIAL') { } |
364
|
0 |
0 |
if ($svflags & 256) { } |
|
0 |
0 |
elsif ($svflags & 512) { } |
|
0 |
0 |
elsif ($svflags & 1024) { } |
367
|
0 |
0 |
if ($svflags & 2147483648) { } |
394
|
0 |
0 |
if $obj->{'flags'} & 16 |
403
|
0 |
0 |
if (ref $obj->{'obj'} eq 'B::RV' or $] >= 5.011 and $obj->{'obj'}->FLAGS & 2048) { } |
414
|
0 |
0 |
if (ref $obj->{'obj'} eq 'B::RV' or $] >= 5.011 and $obj->{'obj'}->FLAGS & 2048) { } |
425
|
0 |
0 |
if (ref $obj->{'obj'} eq 'B::RV' or $] >= 5.011 and $obj->{'obj'}->FLAGS & 2048) { } |
456
|
0 |
0 |
if $obj->{'flags'} & 16 |
475
|
0 |
0 |
if ($av eq 'POPs' and $ix eq 'POPi') { } |
|
0 |
0 |
elsif ($ix =~ /^-?[\d\.]+$/) { } |