line |
true |
false |
branch |
51
|
3 |
8 |
if (-d "$d/$me/") |
55
|
3 |
6 |
if (my($fetcher) = $b =~ /^(.*)\.pm$/) |
56
|
3 |
0 |
if $fetcher eq 'Cache' |
125
|
0 |
0 |
wantarray ? : |
151
|
0 |
0 |
if (defined(my $cached = Lyrics::Fetcher::Cache::get($artist, $title))) |
156
|
0 |
0 |
$cached ? : |
160
|
0 |
0 |
if ($fetcherspec and not ref $fetcherspec and $fetcherspec ne 'auto') { } |
|
0 |
0 |
elsif (ref $fetcherspec eq 'ARRAY') { } |
162
|
0 |
0 |
if (grep /$fetcherspec/, @Lyrics::Fetcher::FETCHERS) { } |
172
|
0 |
0 |
if (grep /$fetcher/, @Lyrics::Fetcher::FETCHERS) { } |
195
|
0 |
0 |
if (not $artist && $title or ref $artist or ref $title) |
200
|
0 |
0 |
if (not $fetchers or ref $fetchers ne 'ARRAY') |
213
|
0 |
0 |
if ($@) |
221
|
0 |
0 |
unless ($fetcherpkg->can('fetch')) |
228
|
0 |
0 |
if ($Lyrics::Fetcher::Error eq 'OK') { } |
271
|
0 |
0 |
if $Lyrics::Fetcher::debug |