line |
true |
false |
branch |
41
|
1 |
4 |
unless $got_length eq $expect_length |
49
|
7 |
3 |
if $$got[$i] == $$expect[$i] |
63
|
3 |
2 |
if (@errors) { } |
80
|
1 |
14 |
if (not defined $got) { } |
|
1 |
13 |
elsif (ref $got) { } |
92
|
1 |
12 |
if (any sub {
ord $_ > 255;
}
, split(//, $got, 0)) |
98
|
3 |
12 |
if $error |
108
|
1 |
11 |
if (not defined $expect) { } |
|
1 |
10 |
elsif (not ref $expect) { } |
|
9 |
1 |
elsif (reftype $expect eq 'ARRAY') { } |
117
|
4 |
5 |
unless (all sub {
$_ <= 255 if defined $_ and not ref $_ and $_ =~ /^\d+$/ and $_ >= 0;
}
, @{$expect;}) |
119
|
20 |
1 |
if defined $_ and not ref $_ and $_ =~ /^\d+$/ and $_ >= 0 |
140
|
7 |
5 |
if $error |