line |
true |
false |
branch |
23
|
0 |
9 |
unless defined $data |
25
|
0 |
9 |
if ref $data |
27
|
3 |
6 |
ref $attr_ref eq 'HASH' ? : |
60
|
12 |
13 |
$2 eq '*' ? : |
62
|
14 |
11 |
$new_count ? : |
66
|
1 |
25 |
if ($data_pool->{'is_multibyte_error'} or not $is_match) |
82
|
0 |
246 |
if $data_pool->{'format_block'} =~ s/
\A % ( % )
/do {
$data_pool->{'output'} .= $1;
''
};/emsx |
91
|
8 |
238 |
if $data_pool->{'format_block'} =~ s/
\A % [\n]
//msx |
95
|
20 |
218 |
if _format_address($data_pool) |
98
|
26 |
192 |
if _format_word($data_pool) |
101
|
11 |
181 |
if _format_ascii($data_pool) |
104
|
161 |
20 |
if $data_pool->{'format_block'} =~ s/
\A (.)
/do {
$data_pool->{'output'} .= $1;
''
};/emsx |
112
|
20 |
0 |
if ($data_pool->{'data_length'}) |
226
|
8 |
40 |
if ($endian eq '<') |
236
|
48 |
10 |
length $data_pool->{'data'} >= $data_pool->{'data_length'} + $byte_length ? : |
237
|
0 |
10 |
if ($byte_length > 1) |
261
|
30 |
2 |
defined $2 ? : |
|
0 |
32 |
defined $1 ? : |