File Coverage

blib/lib/Acme/MorningMusume/KusumiKoharu.pm
Criterion Covered Total %
statement 10 10 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod 0 1 0.0
total 14 15 93.3


line stmt bran cond sub pod time code
1             package Acme::MorningMusume::KusumiKoharu;
2              
3 2     2   7 use strict;
  2         2  
  2         41  
4 2     2   6 use warnings;
  2         2  
  2         39  
5              
6 2     2   5 use base qw(Acme::MorningMusume::Base);
  2         2  
  2         217  
7              
8             our $VERSION = '0.20';
9              
10             sub info {
11             return (
12 2     2 0 10 first_name_ja => '小春',
13             family_name_ja => '久住',
14             first_name_en => 'Koharu',
15             family_name_en => 'Kusumi',
16             nick => [qw(こは くすみん)],
17             birthday => $_[0]->_datetime_from_date('1992-07-15'),
18             blood_type => 'A',
19             hometown => '新潟県',
20             emoticon => ['从б_бﾘ', 'ﾘo´ｩ｀ﾘ'],
21             class => 7,
22             graduate_date => $_[0]->_datetime_from_date('2009-12-06'),
23             );
24             }
25              
26             1;