| line |
true |
false |
branch |
|
108
|
0 |
0 |
unless my(@symbols) = @_
|
|
123
|
0 |
0 |
unless ($symbol =~ /^[A-Za-z0-9]{1,6}$/)
|
|
132
|
0 |
0 |
if ($status != 1 or $info{join $;, $symbol, "last"} eq "")
|
|
138
|
0 |
0 |
if ($status != 1)
|
|
152
|
0 |
0 |
if (exists $info{join $;, $symbol, "date"} and $info{join $;, $symbol, "date"} =~ /([0-9]{4}-[0-9]{2}-[0-9]{2})T/)
|
|
167
|
0 |
0 |
if wantarray
|
|
182
|
0 |
0 |
unless $status == 1
|
|
219
|
0 |
0 |
unless $status == 1
|
|
221
|
0 |
0 |
if (exists $data->{'error'})
|
|
228
|
0 |
0 |
unless (exists $data->{'data'})
|
|
264
|
0 |
0 |
unless ($response->is_success)
|
|
271
|
0 |
0 |
unless ($response->header("content-type") =~ m[application/json]i)
|
|
282
|
0 |
0 |
if ($@)
|
|
302
|
0 |
0 |
if (exists $$data{$label_map->{$label}} and defined $$data{$label_map->{$label}}) { }
|
|
305
|
0 |
0 |
if ($label eq 'name' and exists $$info{join $;, $symbol, $label} and uc $$info{join $;, $symbol, $label} ne uc $$data{$label_map->{$label}}) { }
|