File Coverage

blib/lib/WWW/NicoVideo/Entry.pm
Criterion Covered Total %
statement 12 12 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod n/a
total 16 16 100.0


line stmt bran cond sub pod time code
1             # -*- mode: perl; coding: utf-8 -*-
2              
3             package WWW::NicoVideo::Entry;
4 1     1   5 use utf8;
  1         2  
  1         6  
5 1     1   27 use strict;
  1         2  
  1         25  
6 1     1   4 use warnings;
  1         1  
  1         44  
7 1     1   4 use base qw[Class::Accessor];
  1         2  
  1         125  
8              
9             __PACKAGE__->mk_accessors(qw[id
10             comment
11             desc
12             imgHeight
13             imgUrl
14             imgWidth
15             length
16             lengthStr
17             numViews
18             numViewsStr
19             numPlayed
20             numPlayedStr
21             title
22             url
23             ]);
24              
25             "Ritsuko";