| line |
true |
false |
branch |
|
40
|
1 |
2 |
unless ($format and eval {
do {
$format->can('encoding')
}
}) |
|
41
|
1 |
0 |
unless defined $format |
|
69
|
719 |
30 |
$bool ? : |
|
76
|
1 |
27 |
unless defined $got |
|
77
|
1 |
27 |
unless defined $exp |
|
80
|
2 |
26 |
if (not ref $got) { } |
|
|
2 |
24 |
elsif (not ref $exp) { } |
|
93
|
23 |
5 |
$bool ? : |
|
100
|
1 |
5 |
unless defined $got |
|
101
|
1 |
5 |
unless defined $exp |
|
104
|
2 |
4 |
if (not ref $got) { } |
|
|
2 |
2 |
elsif (not ref $exp) { } |
|
117
|
1 |
5 |
$bool ? : |
|
136
|
0 |
0 |
if $ctx |
|
143
|
0 |
0 |
if $ctx |
|
168
|
3 |
3 |
unless $code |
|
205
|
274 |
12 |
if $bool |
|
215
|
115 |
59 |
@items == 1 ? : |
|
234
|
2 |
11 |
unless ($gottype) |
|
240
|
1 |
10 |
if ($wanttype and $gottype ne $wanttype) |
|
259
|
213 |
40 |
if (my $glob = $stash->{$name}) |
|
261
|
211 |
2 |
if defined $val |
|
341
|
2 |
11 |
unless ($type) |
|
355
|
2 |
11 |
unless $lived |
|
357
|
7 |
6 |
if ($test and $lived) |
|
369
|
2 |
4 |
if ($type eq 'str') { } |
|
|
2 |
2 |
elsif ($type eq 'num') { } |
|
370
|
2 |
0 |
defined $got ? : |
|
371
|
2 |
0 |
defined $exp ? : |
|
374
|
2 |
0 |
defined $got ? : |
|
375
|
2 |
0 |
defined $exp ? : |
|
382
|
3 |
3 |
ref $got ? : |
|
383
|
3 |
3 |
ref $exp ? : |
|
392
|
3 |
3 |
if ($show_both) { } |
|
393
|
2 |
1 |
$lived ? : |
|
402
|
2 |
1 |
$lived ? : |