| line |
true |
false |
branch |
|
220
|
0 |
11 |
unless open my $fh, '<', $INC{'Test/Specio.pm'}
|
|
222
|
451 |
16698 |
if /^our (\$[A-Z0-9_]+)(?: +=|;)/
|
|
1172
|
39 |
35 |
unless &blessed($type)
|
|
1181
|
70 |
4 |
if ($type->can_be_inlined)
|
|
1185
|
7 |
67 |
unless $tests->{'accept'}
|
|
1203
|
572 |
30 |
if ($inlined)
|
|
1213
|
2 |
72 |
unless $tests->{'reject'}
|
|
1233
|
2053 |
184 |
if ($inlined)
|
|
1254
|
99 |
5157 |
unless defined $val
|
|
1256
|
2372 |
2785 |
unless (ref $val)
|
|
1257
|
204 |
2168 |
if $val eq ''
|
|
1259
|
1411 |
757 |
&looks_like_number($val) && !($val =~ /\n/) ? :
|
|
1263
|
97 |
2688 |
if &openhandle($val) and not &blessed($val)
|
|
1266
|
2071 |
617 |
if (&blessed($val)) { }
|
|
1268
|
204 |
1867 |
if ($val->isa('_T::StrOverload')) { }
|
|
|
194 |
1673 |
elsif ($val->isa('_T::BoolOverload')) { }
|
|
|
485 |
1188 |
elsif ($val->isa('_T::NumOverload')) { }
|
|
1272
|
97 |
97 |
$val ? :
|