File Coverage

blib/lib/AudioFile/Info/Dummy.pm
Criterion Covered Total %
statement 15 15 100.0
branch n/a
condition n/a
subroutine 10 10 100.0
pod 7 7 100.0
total 32 32 100.0


line stmt bran cond sub pod time code
1             =head1 NAME
2              
3             AudioFile::Info::Dummy
4              
5             =head1 DESCRIPTION
6              
7             Dummy plugin for testing AudioFile::Info.
8              
9             =head1 SYNOPSIS
10              
11             Don't use this.
12              
13             =cut
14              
15             package AudioFile::Info::Dummy;
16              
17 1     1   53 use 5.006;
  1         5  
18 1     1   6 use strict;
  1         2  
  1         21  
19 1     1   5 use warnings;
  1         1  
  1         137  
20              
21             =head1 METHODS
22              
23             =head2 new, artist, title, album, track, year, genre
24              
25             =cut
26              
27             sub new {
28 1     1 1 5 return bless {}, $_[0];
29             }
30              
31 1     1 1 809 sub artist { return 'ARTIST' }
32 1     1 1 7 sub title { return 'TITLE' }
33 1     1 1 7 sub album { return 'ALBUM' }
34 1     1 1 4 sub track { return 0 }
35 1     1 1 4 sub year { return 'YEAR' }
36 1     1 1 4 sub genre { return 'GENRE' }
37              
38             1;
39