File Coverage

blib/lib/Faker/Plugin/JaJp/PersonFirstKanaName.pm
Criterion Covered Total %
statement 15 15 100.0
branch 2 2 100.0
condition n/a
subroutine 7 7 100.0
pod 1 3 33.3
total 25 27 92.5


line stmt bran cond sub pod time code
1             package Faker::Plugin::JaJp::PersonFirstKanaName;
2              
3 2     2   21846 use 5.018;
  2         10  
4              
5 2     2   13 use strict;
  2         4  
  2         42  
6 2     2   10 use warnings;
  2         6  
  2         74  
7              
8 2     2   13 use Venus::Class 'base';
  2         4  
  2         15  
9              
10             base 'Faker::Plugin::JaJp';
11              
12             # VERSION
13              
14             our $VERSION = '1.17';
15              
16             # METHODS
17              
18             sub execute {
19 6     6 1 1414 my ($self, $data) = @_;
20              
21 6 100       21 return (lc($self->faker->person_gender) eq 'male')
22             ? $self->faker->random->select(data_for_first_kana_name_male())
23             : $self->faker->random->select(data_for_first_kana_name_female());
24             }
25              
26             sub data_for_first_kana_name_male {
27 4     4 0 29 state $first_kana_name = [
28             'アキラ',
29             'アツシ',
30             'オサム',
31             'カズヤ',
32             'キョウスケ',
33             'ケンイチ',
34             'シュウヘイ',
35             'ショウタ',
36             'ジュン',
37             'ソウタロウ',
38             'タイチ',
39             'タロウ',
40             'タクマ',
41             'ツバサ',
42             'トモヤ',
43             'ナオキ',
44             'ナオト',
45             'ヒデキ',
46             'ヒロシ',
47             'マナブ',
48             'ミツル',
49             'ミノル',
50             'ユウキ',
51             'ユウタ',
52             'ヤスヒロ',
53             'ヨウイチ',
54             'ヨウスケ',
55             'リョウスケ',
56             'リョウヘイ',
57             'レイ',
58             ]
59             }
60              
61             sub data_for_first_kana_name_female {
62 2     2 0 13 state $first_kana_name = [
63             'アケミ',
64             'アスカ',
65             'カオリ',
66             'カナ',
67             'クミコ',
68             'サユリ',
69             'サトミ',
70             'チヨ',
71             'ナオコ',
72             'ナナミ',
73             'ハナコ',
74             'ハルカ',
75             'マアヤ',
76             'マイ',
77             'ミカコ',
78             'ミキ',
79             'モモコ',
80             'ユイ',
81             'ユミコ',
82             'ヨウコ',
83             'リカ',
84             ]
85             }
86              
87             1;
88              
89              
90              
91             =head1 NAME
92              
93             Faker::Plugin::JaJp::PersonFirstKanaName - Person First Kana Name
94              
95             =cut
96              
97             =head1 ABSTRACT
98              
99             Person First Kana Name for Faker
100              
101             =cut
102              
103             =head1 VERSION
104              
105             1.17
106              
107             =cut
108              
109             =head1 SYNOPSIS
110              
111             package main;
112              
113             use Faker::Plugin::JaJp::PersonFirstKanaName;
114              
115             my $plugin = Faker::Plugin::JaJp::PersonFirstKanaName->new;
116              
117             # bless(..., "Faker::Plugin::JaJp::PersonFirstKanaName")
118              
119             =cut
120              
121             =head1 DESCRIPTION
122              
123             This package provides methods for generating fake data for person first kana name.
124              
125             =encoding utf8
126              
127             =cut
128              
129             =head1 INHERITS
130              
131             This package inherits behaviors from:
132              
133             L
134              
135             =cut
136              
137             =head1 METHODS
138              
139             This package provides the following methods:
140              
141             =cut
142              
143             =head2 execute
144              
145             execute(HashRef $data) (Str)
146              
147             The execute method returns a returns a random fake person first kana name.
148              
149             I>
150              
151             =over 4
152              
153             =item execute example 1
154              
155             package main;
156              
157             use Faker::Plugin::JaJp::PersonFirstKanaName;
158              
159             my $plugin = Faker::Plugin::JaJp::PersonFirstKanaName->new;
160              
161             # bless(..., "Faker::Plugin::JaJp::PersonFirstKanaName")
162              
163             # my $result = $plugin->execute;
164              
165             # 'タクマ';
166              
167             # my $result = $plugin->execute;
168              
169             # 'トモヤ';
170              
171             # my $result = $plugin->execute;
172              
173             # 'ヒデキ';
174              
175             =back
176              
177             =cut
178              
179             =head2 new
180              
181             new(HashRef $data) (Plugin)
182              
183             The new method returns a new instance of the class.
184              
185             I>
186              
187             =over 4
188              
189             =item new example 1
190              
191             package main;
192              
193             use Faker::Plugin::JaJp::PersonFirstKanaName;
194              
195             my $plugin = Faker::Plugin::JaJp::PersonFirstKanaName->new;
196              
197             # bless(..., "Faker::Plugin::JaJp::PersonFirstKanaName")
198              
199             =back
200              
201             =cut