| line |
true |
false |
branch |
|
26
|
29 |
1 |
if (exists $$arg_ref{'filename'}) { } |
|
33
|
8 |
21 |
if (exists $$arg_ref{'binary'}) { } |
|
34
|
6 |
2 |
$$arg_ref{'binary'} eq 1 ? : |
|
40
|
9 |
20 |
if (exists $$arg_ref{'string'}) { } |
|
41
|
8 |
1 |
$$arg_ref{'string'} eq 1 ? : |
|
58
|
25 |
131211 |
if (/^@/) { } |
|
60
|
12 |
8 |
if (@block > 1) |
|
68
|
12 |
4 |
if (@block > 1) |
|
77
|
1 |
131210 |
if ($dat =~ /^_/) |
|
80
|
131169 |
41 |
if ($numeric) { } |
|
82
|
131159 |
10 |
if ($hex_mode) { } |
|
83
|
1 |
131158 |
if $dat =~ /[^\da-f]/ |
|
84
|
1 |
131157 |
if length $dat > 8 |
|
88
|
1 |
9 |
if $dat =~ /[^01]/ |
|
89
|
1 |
8 |
if length $dat > 32 |
|
94
|
26 |
15 |
if ($hex_mode) { } |
|
95
|
1 |
25 |
if $dat =~ /[^\da-fxz_]/ |
|
98
|
1 |
14 |
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
|
1 |
28 |
unless open my $IN_FH, '<', $file |
|
148
|
86 |
62 |
defined $2 ? : |