File Coverage

blib/lib/Lyrics/Fetcher/LyricWiki.pm
Criterion Covered Total %
statement 10 10 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod 1 1 100.0
total 15 15 100.0


line stmt bran cond sub pod time code
1             package Lyrics::Fetcher::LyricWiki;
2              
3             # $Id$
4              
5 1     1   68110 use 5.005000;
  1         4  
6 1     1   6 use strict;
  1         2  
  1         24  
7 1     1   6 use warnings;
  1         2  
  1         80  
8              
9             our $VERSION = '0.20';
10              
11             =head1 NAME
12              
13             Lyrics::Fetcher::LyricWiki - DEPRECATED now LyricWiki is dead
14              
15             =head1 SYNOPSIS
16              
17             # No synopsis is useful here, as LyricWiki has shutdown, so this dist
18             # remains only as a stub to warn.
19              
20             =head1 DESCRIPTION
21              
22             This was a fetcher for L to fetch lyrics from www.lyricwiki.org
23             which was taken over by Fandom.
24              
25             Fandom killed off LyricWiki on 21st September 2020; this fetcher now exists
26             only as a stub to return an error, for the sake of anyone already using it
27             - there is absolutely no point in installing it afresh.
28              
29             For the closure reasons, see the L
30              
31             =head1 FUNCTIONS
32              
33             =over 4
34              
35             =item I($artist, $song)
36              
37             Fetch lyrics for the requested song.
38              
39             =cut
40              
41             sub fetch {
42 1     1 1 982 my $self = shift;
43 1         3 $Lyrics::Fetcher::Error = 'LyricsWiki no longer exists';
44             }
45              
46              
47              
48             1;
49             __END__