line |
true |
false |
branch |
26
|
1 |
0 |
unless $param{'header'} and $param{'header'} =~ /^no(?:ne)?$/ |
37
|
0 |
2 |
if ($$self{'_aborted'}) |
50
|
2 |
1 |
if (not exists $$self{'_header'}) { } |
54
|
1 |
0 |
if not $$self{'_aborted'} and $stream->Length |
57
|
0 |
2 |
if ($@) |
58
|
0 |
0 |
if $@ =~ /^The stream ran short by/ |
68
|
1 |
0 |
unless (ref $file or $file =~ /^\*[\w:]+$/) |
70
|
0 |
1 |
unless open F, $file |
79
|
1 |
0 |
unless $$self{'_aborted'} |
92
|
1 |
0 |
unless (exists $$header{'signature'}) |
94
|
0 |
1 |
if $h ne 'CWS' and $h ne 'FWS' |
96
|
1 |
0 |
unless exists $$header{'version'} |
97
|
1 |
0 |
unless exists $$header{'filelen'} |
98
|
1 |
0 |
if $$header{'signature'} eq 'CWS' |
99
|
1 |
0 |
unless exists $$header{'nbits'} |
101
|
1 |
0 |
unless exists $$header{'xmin'} |
102
|
1 |
0 |
unless exists $$header{'xmax'} |
103
|
1 |
0 |
unless exists $$header{'ymin'} |
104
|
1 |
0 |
unless exists $$header{'ymax'} |
105
|
1 |
0 |
unless exists $$header{'rate'} |
106
|
1 |
0 |
unless exists $$header{'count'} |
116
|
6 |
0 |
unless exists $$tag{'header'} |
117
|
6 |
0 |
unless (exists $$tag{'length'}) |
119
|
1 |
5 |
if $length == 63 |
122
|
6 |
0 |
unless (exists $$tag{'data'}) |
130
|
0 |
6 |
if ($@) |
131
|
0 |
0 |
if $@ =~ /^The stream ran short by/ |
135
|
0 |
6 |
if $offset < 0 |
136
|
0 |
6 |
if $offset > 0 |