| line |
true |
false |
branch |
|
43
|
1 |
0 |
unless $$self{'solar_data'}{$item} or $$self{'hf'}{$item} or $$self{'vhf'}{$item} or $$self{'extended'}{$item} |
|
68
|
0 |
1 |
unless my $content = $self->_get_content($data_url) |
|
71
|
0 |
1 |
unless my $xml = 'XML::Reader::PP'->new(\$content) |
|
76
|
18 |
2 |
if ($xml->value ne '' and not $xml->path =~ /calculated/ and $xml->tag ne '@url' and $xml->tag ne 'source') |
|
80
|
1 |
17 |
if ($xml->tag eq 'xray') |
|
81
|
1 |
17 |
if ($xml->tag eq 'kindex') |
|
82
|
1 |
17 |
if ($xml->tag eq 'aindex') |
|
83
|
1 |
17 |
if ($xml->tag eq 'protonflux') |
|
84
|
1 |
17 |
if ($xml->tag eq 'electonflux') |
|
85
|
1 |
17 |
if ($xml->tag eq 'solarflux') |
|
91
|
54 |
44 |
if ($xml->path =~ /calculated/) |
|
93
|
26 |
28 |
if ($xml->tag =~ /\@/) { } |
|
97
|
8 |
20 |
if ($p_data =~ /(\d+)m(\-\d+m) (day|night) (.+)/i) |
|
102
|
5 |
23 |
if ($p_data =~ /^(.+)(Band .+)/) |
|
118
|
0 |
1 |
unless ($response->is_success) |
|
131
|
0 |
1 |
if $$self{'description'} eq 'numeric' |
|
132
|
0 |
1 |
if $num <= 7 |
|
133
|
1 |
0 |
if $num >= 8 and $num <= 15 |
|
134
|
0 |
0 |
if $num >= 16 and $num <= 29 |
|
135
|
0 |
0 |
if $num >= 30 and $num <= 49 |
|
136
|
0 |
0 |
if $num >= 50 and $num <= 99 |
|
137
|
0 |
0 |
if $num >= 100 and $num <= 400 |
|
143
|
0 |
1 |
if $$self{'description'} eq 'numeric' |
|
144
|
0 |
1 |
if $num <= 2 |
|
145
|
0 |
1 |
if $num == 3 |
|
146
|
1 |
0 |
if $num == 4 |
|
147
|
0 |
0 |
if $num == 5 |
|
148
|
0 |
0 |
if $num == 6 |
|
149
|
0 |
0 |
if $num >= 7 and $num <= 9 |
|
168
|
1 |
5 |
if ($num =~ /$xray_key/i) |
|
177
|
1 |
0 |
if $$self{'description'} ne 'numeric' |
|
207
|
1 |
0 |
if $$self{'description'} ne 'numeric' |
|
216
|
0 |
1 |
if $num < 10 |
|
217
|
0 |
1 |
if $num > 10 and $num < 100 |
|
218
|
1 |
0 |
if $num > 100 and $num < 1000 |
|
219
|
0 |
1 |
if $num > 1000 |
|
228
|
1 |
0 |
if $$self{'description'} ne 'numeric' |
|
240
|
0 |
1 |
if ($num <= 70) |
|
245
|
0 |
1 |
if ($num > 70 and $num <= 90) |
|
250
|
0 |
1 |
if ($num > 90 and $num <= 120) |
|
255
|
1 |
0 |
if ($num > 120 and $num <= 150) |
|
260
|
0 |
1 |
if ($num > 150 and $num <= 200) |
|
265
|
0 |
1 |
if ($num > 200) |
|
279
|
1 |
0 |
if $$self{'description'} ne 'numeric' |