| line |
true |
false |
branch |
|
16
|
0 |
0 |
if $args and $args->{'debug'} |
|
20
|
1 |
3 |
unless ($soi eq "\377\330") |
|
26
|
0 |
0 |
if $args and $args->{'debug'} |
|
36
|
0 |
0 |
if $args and $args->{'debug'} |
|
55
|
2 |
3 |
if (ref $_[0] eq 'SCALAR') { } |
|
57
|
0 |
2 |
unless $fh = 'IO::String'->new($_[0]) |
|
59
|
1 |
2 |
unless open $fh, '<', $_[0] |
|
63
|
0 |
4 |
$args && $args->{'debug'} ? : |
|
64
|
1 |
3 |
unless ($soi eq "\377\330") |
|
72
|
0 |
9 |
$args && $args->{'debug'} ? : |
|
73
|
0 |
9 |
unless defined $ff |
|
75
|
0 |
9 |
if ($ff != 255) |
|
78
|
0 |
0 |
$args && $args->{'debug'} ? : |
|
79
|
0 |
0 |
unless defined $ff |
|
80
|
0 |
0 |
if $ff == 255 |
|
83
|
0 |
0 |
$args && $args->{'debug'} ? : |
|
86
|
0 |
9 |
if ($mark == 255) |
|
88
|
0 |
0 |
$args && $args->{'debug'} ? : |
|
89
|
0 |
0 |
if $mark != 255 |
|
93
|
0 |
9 |
if $mark == 218 or $mark == 217 |
|
95
|
0 |
0 |
if $args and $args->{'debug'} |
|
97
|
0 |
9 |
$args && $args->{'debug'} ? : |
|
98
|
0 |
9 |
if $len < 2 |
|
100
|
3 |
6 |
if $mark < 224 |
|
103
|
5 |
1 |
if ($mark == 224) { } |
|
104
|
0 |
5 |
$args && $args->{'debug'} ? : |
|
105
|
0 |
0 |
if $args and $args->{'debug'} |
|
112
|
5 |
22 |
if $value == 0 |
|
135
|
0 |
31 |
if $_[2] |
|
138
|
0 |
31 |
unless defined $n |
|
139
|
0 |
31 |
unless $n == $len |
|
166
|
0 |
4 |
unless $ref and ref $ref eq 'HASH' |
|
173
|
0 |
37 |
unless (defined $ref->{$key}) |
|
174
|
0 |
0 |
if $args and $args->{'debug'} |
|
177
|
4 |
33 |
if ($key eq 'version') |
|
178
|
0 |
4 |
if $args and $args->{'debug'} and $ref->{$key} != 0 |
|
181
|
4 |
29 |
if ($key eq 'delay') { } |
|
|
4 |
25 |
elsif ($key eq 'repeat') { } |
|
|
4 |
21 |
elsif ($key eq 'parse_next') { } |
|
|
4 |
17 |
elsif ($key eq 'length') { } |
|
|
4 |
13 |
elsif ($key eq 'previous') { } |
|
|
4 |
9 |
elsif ($key eq 'x_offset') { } |
|
|
4 |
5 |
elsif ($key eq 'y_offset') { } |
|
|
4 |
1 |
elsif ($key eq 'dispose_op') { } |
|
|
1 |
0 |
elsif ($key eq 'metadata') { } |
|
182
|
2 |
2 |
if ($ref->{$key} <= 255) { } |
|
|
1 |
1 |
elsif ($ref->{$key} <= 65535) { } |
|
183
|
0 |
2 |
if $args and $args->{'debug'} |
|
186
|
0 |
1 |
if $args and $args->{'debug'} |
|
189
|
0 |
1 |
if $args and $args->{'debug'} |
|
193
|
2 |
2 |
if ($ref->{$key} <= 255) { } |
|
|
2 |
0 |
elsif ($ref->{$key} <= 65535) { } |
|
194
|
0 |
2 |
if $args and $args->{'debug'} |
|
197
|
0 |
2 |
if $args and $args->{'debug'} |
|
203
|
2 |
2 |
if ($ref->{$key} <= 255) { } |
|
|
2 |
0 |
elsif ($ref->{$key} <= 65535) { } |
|
211
|
1 |
3 |
if ($ref->{$key} <= 255) { } |
|
|
2 |
1 |
elsif ($ref->{$key} <= 65535) { } |
|
219
|
1 |
3 |
if ($ref->{$key} <= 255) { } |
|
|
2 |
1 |
elsif ($ref->{$key} <= 65535) { } |
|
227
|
2 |
2 |
if ($ref->{$key} <= 255) { } |
|
|
2 |
0 |
elsif ($ref->{$key} <= 65535) { } |
|
235
|
2 |
2 |
if ($ref->{$key} <= 255) { } |
|
|
2 |
0 |
elsif ($ref->{$key} <= 65535) { } |
|
243
|
4 |
0 |
if ($ref->{$key} <= 2) { } |
|
258
|
1 |
3 |
if ($ref->{'metadata'}) |
|
259
|
0 |
1 |
if $args and $args->{'debug'} |
|
261
|
0 |
4 |
if $args and $args->{'debug'} |
|
291
|
0 |
5 |
unless defined $binary |
|
298
|
0 |
5 |
if $args and $args->{'debug'} |
|
300
|
0 |
5 |
if $args and $args->{'debug'} |
|
307
|
37 |
0 |
if ($byte) |
|
309
|
3 |
34 |
if ($key_num == 1) { } |
|
|
1 |
33 |
elsif ($key_num == 2) { } |
|
|
1 |
32 |
elsif ($key_num == 4) { } |
|
|
2 |
30 |
elsif ($key_num == 17) { } |
|
|
2 |
28 |
elsif ($key_num == 18) { } |
|
|
2 |
26 |
elsif ($key_num == 33) { } |
|
|
2 |
24 |
elsif ($key_num == 34) { } |
|
|
1 |
23 |
elsif ($key_num == 49) { } |
|
|
2 |
21 |
elsif ($key_num == 50) { } |
|
|
1 |
20 |
elsif ($key_num == 52) { } |
|
|
1 |
19 |
elsif ($key_num == 65) { } |
|
|
2 |
17 |
elsif ($key_num == 66) { } |
|
|
1 |
16 |
elsif ($key_num == 68) { } |
|
|
2 |
14 |
elsif ($key_num == 81) { } |
|
|
2 |
12 |
elsif ($key_num == 82) { } |
|
|
2 |
10 |
elsif ($key_num == 97) { } |
|
|
2 |
8 |
elsif ($key_num == 98) { } |
|
|
4 |
4 |
elsif ($key_num == 113) { } |
|
|
4 |
0 |
elsif ($key_num == 160) { } |
|
311
|
0 |
3 |
if $args and $args->{'debug'} |
|
314
|
0 |
1 |
if $args and $args->{'debug'} |
|
317
|
0 |
1 |
if $args and $args->{'debug'} |
|
320
|
0 |
2 |
if $args and $args->{'debug'} |
|
323
|
0 |
2 |
if $args and $args->{'debug'} |
|
354
|
4 |
0 |
if defined $mkey_utf8 |
|
355
|
4 |
0 |
if defined $mvalue_utf8 |
|
356
|
0 |
4 |
if $args and $args->{'debug'} |
|
360
|
5 |
32 |
if $offset >= $length |