| line |
true |
false |
branch |
|
26
|
24 |
1 |
if (exists $$arg_ref{'filename'}) { } |
|
33
|
6 |
18 |
if (exists $$arg_ref{'binary'}) { } |
|
34
|
4 |
2 |
$$arg_ref{'binary'} eq 1 ? : |
|
40
|
6 |
18 |
if (exists $$arg_ref{'string'}) { } |
|
41
|
6 |
0 |
$$arg_ref{'string'} eq 1 ? : |
|
58
|
25 |
65666 |
if (/^@/) { } |
|
60
|
12 |
8 |
if (@block > 1) |
|
68
|
11 |
4 |
if (@block > 1) |
|
77
|
1 |
65665 |
if ($dat =~ /^_/) |
|
80
|
65630 |
35 |
if ($numeric) { } |
|
82
|
65623 |
7 |
if ($hex_mode) { } |
|
83
|
1 |
65622 |
if $dat =~ /[^\da-f]/ |
|
84
|
1 |
65621 |
if length $dat > 8 |
|
88
|
0 |
7 |
if $dat =~ /[^01]/ |
|
89
|
1 |
6 |
if length $dat > 32 |
|
94
|
23 |
12 |
if ($hex_mode) { } |
|
95
|
0 |
23 |
if $dat =~ /[^\da-fxz_]/ |
|
98
|
0 |
12 |
if $dat =~ /[^01xz_]/ |
|
109
|
2 |
23 |
unless length $addr |
|
110
|
20 |
3 |
if ($numeric) { } |
|
112
|
1 |
19 |
unless length $addr |
|
113
|
3 |
16 |
if $addr =~ /[^\da-f]/ |
|
114
|
1 |
15 |
if length $addr > 8 |
|
118
|
1 |
2 |
if $addr =~ /[^\da-f_]/ |
|
131
|
0 |
24 |
unless open my $IN_FH, '<', $file |
|
148
|
79 |
59 |
defined $2 ? : |