File Coverage

blib/lib/Mock/Person/JP/Person/Name.pm

Criterion	Covered	Total	%
statement	16	16	100.0
branch			n/a
condition			n/a
subroutine	11	11	100.0
pod	7	9	77.7
total	34	36	94.4

package Mock::Person::JP::Person::Name;

use strict;
use warnings;

sub new
{
    my ($class, $name_hashref) = @_;

    return bless $name_hashref, $class;
}

sub first_name      { shift->{mei}; }
sub last_name       { shift->{sei}; }
sub sei             { shift->{sei}; }
sub mei             { shift->{mei}; }

sub first_name_yomi { shift->{mei_yomi}; }
sub last_name_yomi  { shift->{sei_yomi}; }
sub sei_yomi        { shift->{sei_yomi}; }
sub mei_yomi        { shift->{mei_yomi}; }

1;

__END__