File Coverage

blib/lib/WebService/YouTube/User.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             #
2             # $Id: User.pm 11 2007-04-09 04:34:01Z hironori.yoshida $
3             #
4             package WebService::YouTube::User;
5 2     2   907 use strict;
  2         5  
  2         71  
6 2     2   11 use warnings;
  2         4  
  2         52  
7 2     2   11 use version; our $VERSION = qv('1.0.3');
  2         3  
  2         20  
8              
9 2     2   199 use base qw(Class::Accessor::Fast);
  2         4  
  2         18  
10              
11             __PACKAGE__->mk_accessors(
12             qw(
13             about_me
14             age
15             books
16             city
17             companies
18             country
19             currently_on
20             favorite_count
21             favorite_video_count
22             first_name
23             friend_count
24             friend_count
25             gender
26             hobbies
27             homepage
28             hometown
29             last_name
30             movies
31             occupations
32             relationship
33             user
34             video_upload_count
35             video_upload_count
36             video_watch_count
37             )
38             );
39              
40             1;
41              
42             __END__