| blib/lib/Finance/TickerSymbols.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 13 | 28 | 46.4 |
| line | true | false | branch |
|---|---|---|---|
| 53 | 7 | 0 | if $res->is_success |
| 55 | 0 | 0 | if $res->is_success |
| 62 | 0 | 7 | unless local $_ = _brws(@_) |
| 64 | 0 | 7 | if ($prs eq 'nas' and $long) { } |
| 3 | 4 | elsif ($prs eq 'nas') { } | |
| 0 | 4 | elsif ($prs eq 'ind' and $long) { } | |
| 3 | 1 | elsif ($prs eq 'ind') { } | |
| 1 | 0 | elsif ($prs eq 'inds') { } | |
| 70 | 0 | 0 | if @ret and $ret[0] eq 'Symbol:Name' |
| 77 | 3 | 0 | if @ret and $ret[0] eq 'Symbol' |
| 112 | 3 | 0 | if grep {$_ eq $wt;} @all |
| 113 | 0 | 0 | if $wt eq 'all' |
| 120 | 0 | 3 | unless %inds |
| 122 | 0 | 3 | unless my $n = $inds{$name} |