File Coverage

blib/lib/Mojo/Webqq/User.pm
Criterion Covered Total %
statement 6 10 60.0
branch n/a
condition n/a
subroutine 2 5 40.0
pod 0 3 0.0
total 8 18 44.4


line stmt bran cond sub pod time code
1             package Mojo::Webqq::User;
2 1     1   7 use strict;
  1         1  
  1         35  
3 1     1   5 use Mojo::Webqq::Base 'Mojo::Webqq::Model::Base';
  1         2  
  1         5  
4             has [qw(
5             face
6             birthday
7             phone
8             occupation
9             allow
10             college
11             id
12             uid
13             sex
14             blood
15             constel
16             homepage
17             state
18             country
19             city
20             personal
21             name
22             shengxiao
23             email
24             token
25             client_type
26             province
27             mobile
28             signature
29             )];
30 0     0 0   sub qq {$_[0]->uid}
31 0     0 0   sub nick {$_[0]->name}
32             sub displayname {
33 0     0 0   my $self = shift;
34 0           return $self->name;
35             }
36              
37             1;