blib/lib/Mock/Person/SK.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
statement | 25 | 25 | 100.0 |
branch | 2 | 2 | 100.0 |
condition | 3 | 3 | 100.0 |
subroutine | 12 | 12 | 100.0 |
pod | 7 | 7 | 100.0 |
total | 49 | 49 | 100.0 |
line | stmt | bran | cond | sub | pod | time | code |
---|---|---|---|---|---|---|---|
1 | package Mock::Person::SK; | ||||||
2 | |||||||
3 | 9 | 9 | 78577 | use base qw(Exporter); | |||
9 | 66 | ||||||
9 | 1234 | ||||||
4 | 9 | 9 | 66 | use strict; | |||
9 | 20 | ||||||
9 | 243 | ||||||
5 | 9 | 9 | 5661 | use utf8; | |||
9 | 131 | ||||||
9 | 57 | ||||||
6 | 9 | 9 | 282 | use warnings; | |||
9 | 26 | ||||||
9 | 240 | ||||||
7 | |||||||
8 | 9 | 9 | 4854 | use Readonly; | |||
9 | 36356 | ||||||
9 | 11086 | ||||||
9 | |||||||
10 | # Constants. | ||||||
11 | Readonly::Scalar our $SPACE => q{ }; | ||||||
12 | Readonly::Array our @EXPORT_OK => qw(first_male first_female middle_female | ||||||
13 | last_male last_female middle_male middle_female name); | ||||||
14 | |||||||
15 | our $VERSION = 0.05; | ||||||
16 | |||||||
17 | # First and middle male names. | ||||||
18 | our @first_male = our @middle_male = qw( | ||||||
19 | Adam | ||||||
20 | Adolf | ||||||
21 | Adrián | ||||||
22 | Alan | ||||||
23 | Albert | ||||||
24 | Albín | ||||||
25 | Aleš | ||||||
26 | Alexander | ||||||
27 | Alexej | ||||||
28 | Alfonz | ||||||
29 | Alfréd | ||||||
30 | Alojz | ||||||
31 | Ambróz | ||||||
32 | Andrej | ||||||
33 | Anton | ||||||
34 | Arnold | ||||||
35 | Arpád | ||||||
36 | Augustín | ||||||
37 | Aurel | ||||||
38 | Bartolomej | ||||||
39 | Belo | ||||||
40 | Beňadik | ||||||
41 | Benjamín | ||||||
42 | Bernard | ||||||
43 | Blahoslav | ||||||
44 | Blažej | ||||||
45 | Bohdan | ||||||
46 | Bohumil | ||||||
47 | Bohumír | ||||||
48 | Bohuš | ||||||
49 | Bohuslav | ||||||
50 | Boleslav | ||||||
51 | Boris | ||||||
52 | Branislav | ||||||
53 | Bruno | ||||||
54 | Bystrík | ||||||
55 | Ctibor | ||||||
56 | Cyprián | ||||||
57 | Cyril | ||||||
58 | Dalibor | ||||||
59 | Daniel | ||||||
60 | Dávid | ||||||
61 | Demeter | ||||||
62 | Denis | ||||||
63 | Dezider | ||||||
64 | Dionýz | ||||||
65 | Dobroslav | ||||||
66 | Dominik | ||||||
67 | Drahomír | ||||||
68 | Drahoslav | ||||||
69 | Dušan | ||||||
70 | Edmund | ||||||
71 | Eduard | ||||||
72 | Emanuel | ||||||
73 | Emil | ||||||
74 | Erik | ||||||
75 | Ernest | ||||||
76 | Ervín | ||||||
77 | Eugen | ||||||
78 | Fedor | ||||||
79 | Félix | ||||||
80 | Ferdinand | ||||||
81 | Filip | ||||||
82 | Florián | ||||||
83 | František | ||||||
84 | Frederik | ||||||
85 | Fridrich | ||||||
86 | Gabriel | ||||||
87 | Gašpar | ||||||
88 | Gejza | ||||||
89 | Gregor | ||||||
90 | Gustáv | ||||||
91 | Henrich | ||||||
92 | Hilda | ||||||
93 | Hubert | ||||||
94 | Hugo | ||||||
95 | Ignác | ||||||
96 | Igor | ||||||
97 | Imrich | ||||||
98 | Ivan | ||||||
99 | Izidor | ||||||
100 | Jakub | ||||||
101 | Ján | ||||||
102 | Jarolím | ||||||
103 | Jaromír | ||||||
104 | Jaroslav | ||||||
105 | Jerguš | ||||||
106 | Jozef | ||||||
107 | Július | ||||||
108 | Juraj | ||||||
109 | Kamil | ||||||
110 | Karol | ||||||
111 | Kazimír | ||||||
112 | Klement | ||||||
113 | Koloman | ||||||
114 | Konštantín | ||||||
115 | Kornel | ||||||
116 | Kristián | ||||||
117 | Krištof | ||||||
118 | Ladislav | ||||||
119 | Leonard | ||||||
120 | Leopold | ||||||
121 | Levoslav | ||||||
122 | Ľubomír | ||||||
123 | Ľuboš | ||||||
124 | Ľuboslav | ||||||
125 | Ľudomil | ||||||
126 | Ľudovít | ||||||
127 | Lujza | ||||||
128 | Lukáš | ||||||
129 | Marcel | ||||||
130 | Marek | ||||||
131 | Marián | ||||||
132 | Mário | ||||||
133 | Martin | ||||||
134 | Matej | ||||||
135 | Matúš | ||||||
136 | Maximilián | ||||||
137 | Medard | ||||||
138 | Metod | ||||||
139 | Michal | ||||||
140 | Mikuláš | ||||||
141 | Milan | ||||||
142 | Miloš | ||||||
143 | Miloslav | ||||||
144 | Milota | ||||||
145 | Miroslav | ||||||
146 | Mojmír | ||||||
147 | Móric | ||||||
148 | Norbert | ||||||
149 | Oldrich | ||||||
150 | Oleg | ||||||
151 | Oliver | ||||||
152 | Ondrej | ||||||
153 | Oskar | ||||||
154 | Oto | ||||||
155 | Patrik | ||||||
156 | Pavol | ||||||
157 | Peter | ||||||
158 | Pravoslav | ||||||
159 | Prokop | ||||||
160 | Radomír | ||||||
161 | Radoslav | ||||||
162 | Radovan | ||||||
163 | Radúz | ||||||
164 | Rastislav | ||||||
165 | René | ||||||
166 | Richard | ||||||
167 | Róbert | ||||||
168 | Roland | ||||||
169 | Roman | ||||||
170 | Romana | ||||||
171 | Rudolf | ||||||
172 | Samuel | ||||||
173 | Sergej | ||||||
174 | Severín | ||||||
175 | Slavomír | ||||||
176 | Stanislav | ||||||
177 | Štefan | ||||||
178 | Svätopluk | ||||||
179 | Svetozár | ||||||
180 | Tadeáš | ||||||
181 | Teodor | ||||||
182 | Tibor | ||||||
183 | Tichomír | ||||||
184 | Timotej | ||||||
185 | Tomáš | ||||||
186 | Urban | ||||||
187 | Václav | ||||||
188 | Valentín | ||||||
189 | Valér | ||||||
190 | Vasil | ||||||
191 | Vavrinec | ||||||
192 | Vendelín | ||||||
193 | Viktor | ||||||
194 | Viliam | ||||||
195 | Vincent | ||||||
196 | Vít | ||||||
197 | Víťazoslav | ||||||
198 | Vladimír | ||||||
199 | Vladislav | ||||||
200 | Vlastimil | ||||||
201 | Vojtech | ||||||
202 | Vratislav | ||||||
203 | Vratko | ||||||
204 | Zdenko | ||||||
205 | Žigmund | ||||||
206 | Zlatko | ||||||
207 | Zoltán | ||||||
208 | ); | ||||||
209 | |||||||
210 | # First and middle female names. | ||||||
211 | our @first_female = our @middle_female = qw( | ||||||
212 | Adela | ||||||
213 | Adriána | ||||||
214 | Agáta | ||||||
215 | Agnesa | ||||||
216 | Albína | ||||||
217 | Alena | ||||||
218 | Alexandra | ||||||
219 | Alica | ||||||
220 | Alojza | ||||||
221 | Alžbeta | ||||||
222 | Amália | ||||||
223 | Anabela | ||||||
224 | Anastázia | ||||||
225 | Andrea | ||||||
226 | Anežka | ||||||
227 | Angela | ||||||
228 | Anna | ||||||
229 | Antónia | ||||||
230 | Aurélia | ||||||
231 | Barbora | ||||||
232 | Beáta | ||||||
233 | Berta | ||||||
234 | Bibiána | ||||||
235 | Blanka | ||||||
236 | Blažena | ||||||
237 | Bohdana | ||||||
238 | Bohumila | ||||||
239 | Bohuslava | ||||||
240 | Božena | ||||||
241 | Božidara | ||||||
242 | Branislava | ||||||
243 | Brigita | ||||||
244 | Bronislava | ||||||
245 | Cecília | ||||||
246 | Dagmara | ||||||
247 | Dana | ||||||
248 | Danica | ||||||
249 | Daniela | ||||||
250 | Darina | ||||||
251 | Dáša | ||||||
252 | Denisa | ||||||
253 | Diana | ||||||
254 | Dobromila | ||||||
255 | Dobroslava | ||||||
256 | Dominika | ||||||
257 | Dorota | ||||||
258 | Drahomíra | ||||||
259 | Drahoslava | ||||||
260 | Dušana | ||||||
261 | Edita | ||||||
262 | Ela | ||||||
263 | Elena | ||||||
264 | Eleonóra | ||||||
265 | Eliška | ||||||
266 | Elvíra | ||||||
267 | Ema | ||||||
268 | Emília | ||||||
269 | Erika | ||||||
270 | Estera | ||||||
271 | Etela | ||||||
272 | Eugénia | ||||||
273 | Filoména | ||||||
274 | Františka | ||||||
275 | Gabriela | ||||||
276 | Galina | ||||||
277 | Gertrúda | ||||||
278 | Gizela | ||||||
279 | Hana | ||||||
280 | Hedviga | ||||||
281 | Helena | ||||||
282 | Henrieta | ||||||
283 | Hermína | ||||||
284 | Hortenzia | ||||||
285 | Ida | ||||||
286 | Iľja | ||||||
287 | Ingrida | ||||||
288 | Irena | ||||||
289 | Irma | ||||||
290 | Ivana | ||||||
291 | Iveta | ||||||
292 | Ivica | ||||||
293 | Izabela | ||||||
294 | Jana | ||||||
295 | Jarmila | ||||||
296 | Jaroslava | ||||||
297 | Jela | ||||||
298 | Jolana | ||||||
299 | Jozefína | ||||||
300 | Judita | ||||||
301 | Júlia | ||||||
302 | Juliana | ||||||
303 | Justína | ||||||
304 | Kamila | ||||||
305 | Karolína | ||||||
306 | Katarína | ||||||
307 | Klára | ||||||
308 | Klaudia | ||||||
309 | Kornélia | ||||||
310 | Kristína | ||||||
311 | Kvetoslava | ||||||
312 | Laura | ||||||
313 | Lea | ||||||
314 | Lenka | ||||||
315 | Lesana | ||||||
316 | Liana | ||||||
317 | Libuša | ||||||
318 | Linda | ||||||
319 | Lívia | ||||||
320 | Ľubica | ||||||
321 | Ľubomíra | ||||||
322 | Ľuboslava | ||||||
323 | Lucia | ||||||
324 | Ľudmila | ||||||
325 | Ľudomila | ||||||
326 | Lýdia | ||||||
327 | Magdaléna | ||||||
328 | Malvína | ||||||
329 | Marcela | ||||||
330 | Margaréta | ||||||
331 | Margita | ||||||
332 | Mária | ||||||
333 | Marianna | ||||||
334 | Marína | ||||||
335 | Marta | ||||||
336 | Martina | ||||||
337 | Matilda | ||||||
338 | Melánia | ||||||
339 | Michaela | ||||||
340 | Milada | ||||||
341 | Milena | ||||||
342 | Milica | ||||||
343 | Miloslava | ||||||
344 | Miriama | ||||||
345 | Miroslava | ||||||
346 | Monika | ||||||
347 | Nadežda | ||||||
348 | Natália | ||||||
349 | Nataša | ||||||
350 | Nikola | ||||||
351 | Nina | ||||||
352 | Nora | ||||||
353 | Oľga | ||||||
354 | Olympia | ||||||
355 | Otília | ||||||
356 | Patrícia | ||||||
357 | Paulína | ||||||
358 | Perla | ||||||
359 | Petra | ||||||
360 | Petronela | ||||||
361 | Regína | ||||||
362 | Renáta | ||||||
363 | Rozália | ||||||
364 | Ružena | ||||||
365 | Sabína | ||||||
366 | Sára | ||||||
367 | Sidónia | ||||||
368 | Silvia | ||||||
369 | Simona | ||||||
370 | Sláva | ||||||
371 | Slávka | ||||||
372 | Slavomíra | ||||||
373 | Soňa | ||||||
374 | Stanislava | ||||||
375 | Štefánia | ||||||
376 | Stela | ||||||
377 | Svetlana | ||||||
378 | Sylva | ||||||
379 | Tamara | ||||||
380 | Tatiana | ||||||
381 | Terézia | ||||||
382 | Uršuľa | ||||||
383 | Valentína | ||||||
384 | Valéria | ||||||
385 | Vanda | ||||||
386 | Veronika | ||||||
387 | Viera | ||||||
388 | Vieroslava | ||||||
389 | Viktória | ||||||
390 | Vilma | ||||||
391 | Viola | ||||||
392 | Vladimíra | ||||||
393 | Vlasta | ||||||
394 | Xénia | ||||||
395 | Žaneta | ||||||
396 | Zdenka | ||||||
397 | Želmíra | ||||||
398 | Zina | ||||||
399 | Zita | ||||||
400 | Zlatica | ||||||
401 | Žofia | ||||||
402 | Zoja | ||||||
403 | Zora | ||||||
404 | Zuzana | ||||||
405 | ); | ||||||
406 | |||||||
407 | # Last male names. | ||||||
408 | our @last_male = qw( | ||||||
409 | Acsai | ||||||
410 | Adamec | ||||||
411 | Aina | ||||||
412 | Alt | ||||||
413 | Altnau | ||||||
414 | Amri | ||||||
415 | Andreánsky | ||||||
416 | Andrich | ||||||
417 | Anjel | ||||||
418 | Antl | ||||||
419 | Argesheimer | ||||||
420 | Auxt | ||||||
421 | Babarík | ||||||
422 | Babnič | ||||||
423 | Bacúšan | ||||||
424 | Baláž | ||||||
425 | Baliak | ||||||
426 | Balkovič | ||||||
427 | Ballinger | ||||||
428 | Bandura | ||||||
429 | Bánik | ||||||
430 | Banský | ||||||
431 | Barbírik | ||||||
432 | Barek | ||||||
433 | Barháč | ||||||
434 | Barinek | ||||||
435 | Bartánus | ||||||
436 | Bártek | ||||||
437 | Belko | ||||||
438 | Belkovič | ||||||
439 | Belopotocký | ||||||
440 | Benč | ||||||
441 | Bendík | ||||||
442 | Beňo | ||||||
443 | Beňuš | ||||||
444 | Beránek | ||||||
445 | Beraxa | ||||||
446 | Berčík | ||||||
447 | Bese | ||||||
448 | Bešenda | ||||||
449 | Betka | ||||||
450 | Bihári | ||||||
451 | Blaho | ||||||
452 | Blišťan | ||||||
453 | Bogus | ||||||
454 | Boháčik | ||||||
455 | Boroš | ||||||
456 | Borovička | ||||||
457 | Bošeľa | ||||||
458 | Bowman | ||||||
459 | Brady | ||||||
460 | Brečka | ||||||
461 | Brenkus | ||||||
462 | Brief | ||||||
463 | Brozman | ||||||
464 | Brož | ||||||
465 | Brtán | ||||||
466 | Brucháč | ||||||
467 | Bruoth | ||||||
468 | Bubelíny | ||||||
469 | Budaj | ||||||
470 | Bukovský | ||||||
471 | Bulla | ||||||
472 | Buncsek | ||||||
473 | Bunčiak | ||||||
474 | Burdy | ||||||
475 | Bursa | ||||||
476 | Butora | ||||||
477 | Bútora | ||||||
478 | Buvala | ||||||
479 | Caban | ||||||
480 | Cambel | ||||||
481 | Cesnak | ||||||
482 | Cibuľa | ||||||
483 | Cibulka | ||||||
484 | Cipciar | ||||||
485 | Citterberg | ||||||
486 | Combrink | ||||||
487 | Corrado | ||||||
488 | Couturier | ||||||
489 | Csáky | ||||||
490 | Cvanga | ||||||
491 | Čech | ||||||
492 | Čelár | ||||||
493 | Černák | ||||||
494 | Červený | ||||||
495 | Čičmanec | ||||||
496 | Čipka | ||||||
497 | Čižmár | ||||||
498 | Čmelík | ||||||
499 | Čunderlík | ||||||
500 | Datko | ||||||
501 | Daxner | ||||||
502 | Degúl | ||||||
503 | Demian | ||||||
504 | Demko | ||||||
505 | Demuth | ||||||
506 | Déneši | ||||||
507 | Deppert | ||||||
508 | Dettweiler | ||||||
509 | Divok | ||||||
510 | Dobrík | ||||||
511 | Dobrota | ||||||
512 | Dočekal | ||||||
513 | Dolinský | ||||||
514 | Dolňan | ||||||
515 | Doncsiák | ||||||
516 | Donoval | ||||||
517 | Doppler | ||||||
518 | Ďordík | ||||||
519 | Dorica | ||||||
520 | Dostál | ||||||
521 | Dovala | ||||||
522 | Dráb | ||||||
523 | Drga | ||||||
524 | Dubéci | ||||||
525 | Dubenský | ||||||
526 | Dubíny | ||||||
527 | Dudáš | ||||||
528 | Dugát | ||||||
529 | Duhan | ||||||
530 | Dunajský | ||||||
531 | Dupej | ||||||
532 | Ďurčík | ||||||
533 | Ďurčo | ||||||
534 | Durek | ||||||
535 | Ďuriš | ||||||
536 | Džuka | ||||||
537 | Eckel | ||||||
538 | Engler | ||||||
539 | Evanoff | ||||||
540 | Eyrich | ||||||
541 | Fabrícius | ||||||
542 | Farárik | ||||||
543 | Farmer | ||||||
544 | Fasco | ||||||
545 | Faschko | ||||||
546 | Faskó | ||||||
547 | Fasko | ||||||
548 | Fassco | ||||||
549 | Faška | ||||||
550 | Faško | ||||||
551 | Fedor | ||||||
552 | Fehér | ||||||
553 | Ferenc | ||||||
554 | Ferenčík | ||||||
555 | Ferianc | ||||||
556 | Ferrara | ||||||
557 | Ferster | ||||||
558 | Figľuš | ||||||
559 | Fillo | ||||||
560 | Filo | ||||||
561 | Fitkomides | ||||||
562 | Formánek | ||||||
563 | Fortiak | ||||||
564 | Francik | ||||||
565 | Franko | ||||||
566 | Franzgreb | ||||||
567 | Frgelec | ||||||
568 | Frntol | ||||||
569 | Futas | ||||||
570 | Gáfrik | ||||||
571 | Gajdoš | ||||||
572 | Gajdošík | ||||||
573 | Gašparovič | ||||||
574 | Gašperan | ||||||
575 | Gazdík | ||||||
576 | Gažura | ||||||
577 | Gažúrik | ||||||
578 | Giablo | ||||||
579 | Giertl | ||||||
580 | Giertli | ||||||
581 | Gilla | ||||||
582 | Glasmacher | ||||||
583 | Gloner | ||||||
584 | Golian | ||||||
585 | Gömöry | ||||||
586 | Gonda | ||||||
587 | Grakalskis | ||||||
588 | Gramla | ||||||
589 | Green | ||||||
590 | Grlický | ||||||
591 | Gronel | ||||||
592 | Gronell | ||||||
593 | Haas | ||||||
594 | Habovčík | ||||||
595 | Hais | ||||||
596 | Hajdúk | ||||||
597 | Hajdusik | ||||||
598 | Halaj | ||||||
599 | Hamaj | ||||||
600 | Hambálek | ||||||
601 | Handlír | ||||||
602 | Haraburda | ||||||
603 | Harmata | ||||||
604 | Harter | ||||||
605 | Harvanka | ||||||
606 | Hauck | ||||||
607 | Haviar | ||||||
608 | Havlíček | ||||||
609 | Havran | ||||||
610 | Havrila | ||||||
611 | Hawes | ||||||
612 | Heckmann | ||||||
613 | Helena | ||||||
614 | Herman | ||||||
615 | Hoechstetter | ||||||
616 | Hojčuš | ||||||
617 | Hoover | ||||||
618 | Horský | ||||||
619 | Horvát | ||||||
620 | Horváth | ||||||
621 | Hosek | ||||||
622 | Hoška | ||||||
623 | Hoško | ||||||
624 | Howard | ||||||
625 | Hrbáň | ||||||
626 | Hrbek | ||||||
627 | Hrmelár | ||||||
628 | Hrnčiarik | ||||||
629 | Hrňo | ||||||
630 | Hruška | ||||||
631 | Hrynda | ||||||
632 | Hudec | ||||||
633 | Hurdálek | ||||||
634 | Húsenica | ||||||
635 | Húska | ||||||
636 | Hutka | ||||||
637 | Huťka | ||||||
638 | Hutta | ||||||
639 | Chabada | ||||||
640 | Chamar | ||||||
641 | Chovan | ||||||
642 | Chovanec | ||||||
643 | Christ | ||||||
644 | Chudík | ||||||
645 | Ionadi | ||||||
646 | Ištván | ||||||
647 | Ivan | ||||||
648 | Ivanec | ||||||
649 | Ivaniš | ||||||
650 | Jágerčík | ||||||
651 | Jančik | ||||||
652 | Jančo | ||||||
653 | Jankovič | ||||||
654 | Jánošík | ||||||
655 | Janošková | ||||||
656 | Javorčík | ||||||
657 | Javorčík | ||||||
658 | Jávorský | ||||||
659 | Jerguš | ||||||
660 | Johan | ||||||
661 | Jokl | ||||||
662 | Juhász | ||||||
663 | Juracek | ||||||
664 | Kabar | ||||||
665 | Kaclik | ||||||
666 | Kaclík | ||||||
667 | Kadecký | ||||||
668 | Kahoun | ||||||
669 | Kachnič | ||||||
670 | Kalaský | ||||||
671 | Kamenský | ||||||
672 | Kán | ||||||
673 | Kantárik | ||||||
674 | Kantoris | ||||||
675 | Kapitán | ||||||
676 | Kappler | ||||||
677 | Kapusta | ||||||
678 | Karásek | ||||||
679 | Kardoš | ||||||
680 | Kaslik | ||||||
681 | Kelvány | ||||||
682 | Kieborz | ||||||
683 | Kieffer | ||||||
684 | Kizek | ||||||
685 | Klafczynski | ||||||
686 | Klajban | ||||||
687 | Kľavko | ||||||
688 | Klein | ||||||
689 | Kleskeň | ||||||
690 | Klíma | ||||||
691 | Klimek | ||||||
692 | Kliment | ||||||
693 | Klimo | ||||||
694 | Kloboučník | ||||||
695 | Kmetz | ||||||
696 | Knapčok | ||||||
697 | Kňaze | ||||||
698 | Kňazík | ||||||
699 | Knoško | ||||||
700 | Kocprd | ||||||
701 | Kočiš | ||||||
702 | Kodric | ||||||
703 | Koenig | ||||||
704 | Kohút | ||||||
705 | Kochan | ||||||
706 | Koľaj | ||||||
707 | Kolaj | ||||||
708 | Kolega | ||||||
709 | Kolesár | ||||||
710 | Komora | ||||||
711 | Komora | ||||||
712 | Koprda | ||||||
713 | Korbeľ | ||||||
714 | Kordulič | ||||||
715 | Korenačka | ||||||
716 | Korim | ||||||
717 | Kösegi | ||||||
718 | Kostka | ||||||
719 | Košičiar | ||||||
720 | Košík | ||||||
721 | Košius | ||||||
722 | Koštial | ||||||
723 | Kotkuliak | ||||||
724 | Kotrčka | ||||||
725 | Kotrík | ||||||
726 | Kotyra | ||||||
727 | Kováč | ||||||
728 | Kováčik | ||||||
729 | Kovalik | ||||||
730 | Koválik | ||||||
731 | Kovalík | ||||||
732 | Kozák | ||||||
733 | Kozar | ||||||
734 | Kozelnicky | ||||||
735 | Kozma | ||||||
736 | Kožiak | ||||||
737 | Kožiar | ||||||
738 | Krajčovič | ||||||
739 | Kralik | ||||||
740 | Krammer | ||||||
741 | Kraner | ||||||
742 | Krejčí | ||||||
743 | Krenický | ||||||
744 | Kresák | ||||||
745 | Krídlo | ||||||
746 | Krieger | ||||||
747 | Krištál | ||||||
748 | Krištek | ||||||
749 | Krištof | ||||||
750 | Krkoška | ||||||
751 | Krnáč | ||||||
752 | Kršák | ||||||
753 | Krupa | ||||||
754 | Kruszynski | ||||||
755 | Krušinský | ||||||
756 | Kružliak | ||||||
757 | Krystosik | ||||||
758 | Kubacký | ||||||
759 | Kubaský | ||||||
760 | Kubica | ||||||
761 | Kubička | ||||||
762 | Kubisch | ||||||
763 | Kubiš | ||||||
764 | Kubizniak | ||||||
765 | Kubos | ||||||
766 | Kubus | ||||||
767 | Kučera | ||||||
768 | Kúdelka | ||||||
769 | Kudor | ||||||
770 | Kuhnsman | ||||||
771 | Kuna | ||||||
772 | Kuntzler | ||||||
773 | Küntzler | ||||||
774 | Kupčok | ||||||
775 | Kupec | ||||||
776 | Kurajda | ||||||
777 | Kuricz | ||||||
778 | Laitman | ||||||
779 | Langhoerig | ||||||
780 | Láni | ||||||
781 | Lanz | ||||||
782 | Laubert | ||||||
783 | Laule | ||||||
784 | Laurinc | ||||||
785 | Ledbetter | ||||||
786 | Ledňa | ||||||
787 | Lefkowitz | ||||||
788 | Lehocký | ||||||
789 | Lehotský | ||||||
790 | Leitman | ||||||
791 | Leitner | ||||||
792 | Lenarth | ||||||
793 | Lepko | ||||||
794 | Lešták | ||||||
795 | Letko | ||||||
796 | Libič | ||||||
797 | Licko | ||||||
798 | Ličko | ||||||
799 | Lie | ||||||
800 | Lihan | ||||||
801 | Lichvár | ||||||
802 | Lipták | ||||||
803 | Liskay | ||||||
804 | Lisý | ||||||
805 | Litva | ||||||
806 | Lojko | ||||||
807 | Lojkovič | ||||||
808 | Lopušný | ||||||
809 | Lovecký | ||||||
810 | Luce | ||||||
811 | Ludvik | ||||||
812 | Lukáč | ||||||
813 | Lupták | ||||||
814 | Ľupták | ||||||
815 | Ľuptovčiak | ||||||
816 | Macko | ||||||
817 | Macula | ||||||
818 | Macuľa | ||||||
819 | Macz | ||||||
820 | Máček | ||||||
821 | Madda | ||||||
822 | Madro | ||||||
823 | Magic | ||||||
824 | Majerčík | ||||||
825 | Makovíni | ||||||
826 | Malatinec | ||||||
827 | Malga | ||||||
828 | Malloy | ||||||
829 | Maľo | ||||||
830 | Malus | ||||||
831 | Mangold | ||||||
832 | Marciň | ||||||
833 | Marconi | ||||||
834 | Marek | ||||||
835 | Marianek | ||||||
836 | Marinko | ||||||
837 | Martinec | ||||||
838 | Márton | ||||||
839 | Martzek | ||||||
840 | Maruška | ||||||
841 | Maruškin | ||||||
842 | Marzec | ||||||
843 | Matejovič | ||||||
844 | Matinec | ||||||
845 | Matoš | ||||||
846 | Matta | ||||||
847 | Matušák | ||||||
848 | Mauritz | ||||||
849 | Mayhew | ||||||
850 | Mazanec | ||||||
851 | Mede | ||||||
852 | Medveď | ||||||
853 | Mereš | ||||||
854 | Meyer | ||||||
855 | Mihál | ||||||
856 | Mihala | ||||||
857 | Michalčík | ||||||
858 | Michelčík | ||||||
859 | Mikloško | ||||||
860 | Mikovíny | ||||||
861 | Mikuláši | ||||||
862 | Mikulík | ||||||
863 | Mikuš | ||||||
864 | Mindek | ||||||
865 | Mindžák | ||||||
866 | Mitický | ||||||
867 | Miťko | ||||||
868 | Mitterbach | ||||||
869 | Mitterka | ||||||
870 | Mlynarčík | ||||||
871 | Mojčák | ||||||
872 | Mokoš | ||||||
873 | Molčan | ||||||
874 | Molota | ||||||
875 | Moorcroft | ||||||
876 | Moravčík | ||||||
877 | Morgenstern | ||||||
878 | Morhard | ||||||
879 | Motyka | ||||||
880 | Mühl | ||||||
881 | Müller | ||||||
882 | Muller | ||||||
883 | Multán | ||||||
884 | Murín | ||||||
885 | Murphy | ||||||
886 | Mutňan | ||||||
887 | Nagel | ||||||
888 | Náhlovský | ||||||
889 | Neal | ||||||
890 | Nelson | ||||||
891 | Nemčok | ||||||
892 | Németh | ||||||
893 | Nezbeda | ||||||
894 | Nichols | ||||||
895 | Nikel | ||||||
896 | Nikolaides | ||||||
897 | Nociar | ||||||
898 | Noellner | ||||||
899 | Noga | ||||||
900 | Nováček | ||||||
901 | Novak | ||||||
902 | Novysedlák | ||||||
903 | Nuota | ||||||
904 | Oberhauser | ||||||
905 | Obrtanec | ||||||
906 | Oceľ | ||||||
907 | Odelga | ||||||
908 | Okruhlica | ||||||
909 | Olsby | ||||||
910 | Olšiak | ||||||
911 | Omasta | ||||||
912 | Ondrášik | ||||||
913 | Ondruška | ||||||
914 | Oravec | ||||||
915 | Oravský | ||||||
916 | Pačesa | ||||||
917 | Paff | ||||||
918 | Pajtinka | ||||||
919 | Palazzo | ||||||
920 | Paleš | ||||||
921 | Palič | ||||||
922 | Pampúrik | ||||||
923 | Pančík | ||||||
924 | Panigaj | ||||||
925 | Pápai | ||||||
926 | Pápaj | ||||||
927 | Patúš | ||||||
928 | Paulen | ||||||
929 | Paulenka | ||||||
930 | Pauliak | ||||||
931 | Paulovič | ||||||
932 | Pavčiak | ||||||
933 | Pavelka | ||||||
934 | Pavlečka | ||||||
935 | Pavlík | ||||||
936 | Pavlove | ||||||
937 | Pazár | ||||||
938 | Pečienka | ||||||
939 | Pekár | ||||||
940 | Peniak | ||||||
941 | Pepich | ||||||
942 | Peško | ||||||
943 | Petljanska | ||||||
944 | Petráš | ||||||
945 | Petrin | ||||||
946 | Petruš | ||||||
947 | Pfender | ||||||
948 | Piatek | ||||||
949 | Pierce | ||||||
950 | Pikula | ||||||
951 | Pilát | ||||||
952 | Piliar | ||||||
953 | Piliarkin | ||||||
954 | Pindiak | ||||||
955 | Pipíš | ||||||
956 | Plieštik | ||||||
957 | Pltník | ||||||
958 | Pobožný | ||||||
959 | Podhoľský | ||||||
960 | Pohančanik | ||||||
961 | Pohančaník | ||||||
962 | Pohorelec | ||||||
963 | Pohorelský | ||||||
964 | Polák | ||||||
965 | Poliak | ||||||
966 | Polóny | ||||||
967 | Ponist | ||||||
968 | Pős | ||||||
969 | Posúch | ||||||
970 | Poš | ||||||
971 | Potančok | ||||||
972 | Pôbiš | ||||||
973 | Pravotiak | ||||||
974 | Prečuch | ||||||
975 | Predajňa | ||||||
976 | Profant | ||||||
977 | Puci | ||||||
978 | Račák | ||||||
979 | Radušovský | ||||||
980 | Rak | ||||||
981 | Rakita | ||||||
982 | Rastocky | ||||||
983 | Raška | ||||||
984 | Ratay | ||||||
985 | Raztocky | ||||||
986 | Ráztocký | ||||||
987 | Remenár | ||||||
988 | Remper | ||||||
989 | Repčiak | ||||||
990 | Repka | ||||||
991 | Révay | ||||||
992 | Rezníček | ||||||
993 | Ribos | ||||||
994 | Ridzoň | ||||||
995 | Riedinger | ||||||
996 | Rigaud | ||||||
997 | Robinson | ||||||
998 | Romankiewicz | ||||||
999 | Rossi | ||||||
1000 | Roštár | ||||||
1001 | Rozkoš | ||||||
1002 | Rozložný | ||||||
1003 | Rudáš | ||||||
1004 | Rusnák | ||||||
1005 | Sabo | ||||||
1006 | Sahó | ||||||
1007 | Saksa | ||||||
1008 | Sanitra | ||||||
1009 | Sečkáš | ||||||
1010 | Seiler | ||||||
1011 | Sekerák | ||||||
1012 | Séleš | ||||||
1013 | Senko | ||||||
1014 | Sepeši | ||||||
1015 | Shiller | ||||||
1016 | Schaaf | ||||||
1017 | Schimpf | ||||||
1018 | Schlebach | ||||||
1019 | Schmer | ||||||
1020 | Schneider | ||||||
1021 | Schnierer | ||||||
1022 | Schreiner | ||||||
1023 | Schvarcbacher | ||||||
1024 | Sieden | ||||||
1025 | Sihelský | ||||||
1026 | Siládi | ||||||
1027 | Siman | ||||||
1028 | Sirota | ||||||
1029 | Sitarčík | ||||||
1030 | Sittler | ||||||
1031 | Skubák | ||||||
1032 | Slafkovský | ||||||
1033 | Slamený | ||||||
1034 | Sleziak | ||||||
1035 | Složil | ||||||
1036 | Slučiak | ||||||
1037 | Smiešna | ||||||
1038 | Smiešny | ||||||
1039 | Soják | ||||||
1040 | Soucz | ||||||
1041 | Souček | ||||||
1042 | Sperka | ||||||
1043 | Spišjak | ||||||
1044 | Spodniak | ||||||
1045 | Springer | ||||||
1046 | Srnka | ||||||
1047 | Stadler | ||||||
1048 | Stanček | ||||||
1049 | Stančík | ||||||
1050 | Stehlo | ||||||
1051 | Steigauf | ||||||
1052 | Stenczel | ||||||
1053 | Straka | ||||||
1054 | Strakota | ||||||
1055 | Strass | ||||||
1056 | Striežovský | ||||||
1057 | Stringer | ||||||
1058 | Strnad | ||||||
1059 | Supala | ||||||
1060 | Surový | ||||||
1061 | Sutter | ||||||
1062 | Sýkora | ||||||
1063 | Šajgal | ||||||
1064 | Šajgalík | ||||||
1065 | Šebo | ||||||
1066 | Šeco | ||||||
1067 | Ševčík | ||||||
1068 | Šimkovič | ||||||
1069 | Šimon | ||||||
1070 | Šimuny | ||||||
1071 | Šimúny | ||||||
1072 | Šindler | ||||||
1073 | Šiška | ||||||
1074 | Škadra | ||||||
1075 | Škantár | ||||||
1076 | Škoda | ||||||
1077 | Škôlka | ||||||
1078 | Škrovina | ||||||
1079 | Škula | ||||||
1080 | Šmajták | ||||||
1081 | Šmejkal | ||||||
1082 | Šmidt | ||||||
1083 | Šmihula | ||||||
1084 | Šperka | ||||||
1085 | Šramko | ||||||
1086 | Štádler | ||||||
1087 | Šťavina | ||||||
1088 | Štefanko | ||||||
1089 | Števlík | ||||||
1090 | Štrba | ||||||
1091 | Štubňa | ||||||
1092 | Štubniak | ||||||
1093 | Štulrajter | ||||||
1094 | Štulreiter | ||||||
1095 | Šulej | ||||||
1096 | Šuran | ||||||
1097 | Švantner | ||||||
1098 | Švarcbacher | ||||||
1099 | Švelka | ||||||
1100 | Švidraň | ||||||
1101 | Švihra | ||||||
1102 | Táborský | ||||||
1103 | Tačár | ||||||
1104 | Takáč | ||||||
1105 | Tapajčík | ||||||
1106 | Taxner | ||||||
1107 | Testevič | ||||||
1108 | Tešlár | ||||||
1109 | Tetliak | ||||||
1110 | Tilka | ||||||
1111 | Tišliar | ||||||
1112 | Tkáčik | ||||||
1113 | Tokár | ||||||
1114 | Tomajka | ||||||
1115 | Tončík | ||||||
1116 | Tonheiser | ||||||
1117 | Toriška | ||||||
1118 | Tóth | ||||||
1119 | Trnavský | ||||||
1120 | Trubiroh | ||||||
1121 | Turčan | ||||||
1122 | Turňa | ||||||
1123 | Turošík | ||||||
1124 | Uher | ||||||
1125 | Ustak | ||||||
1126 | Vajcík | ||||||
1127 | Valentino | ||||||
1128 | Valentko | ||||||
1129 | Vandlík | ||||||
1130 | Vaník | ||||||
1131 | Varga | ||||||
1132 | Vaslík | ||||||
1133 | Vašina | ||||||
1134 | Veládi | ||||||
1135 | Venger | ||||||
1136 | Vernársky | ||||||
1137 | Vetrák | ||||||
1138 | Veverka | ||||||
1139 | Vičan | ||||||
1140 | Vilímek | ||||||
1141 | Vist | ||||||
1142 | Vitello | ||||||
1143 | Vlaszati | ||||||
1144 | Vlčko | ||||||
1145 | Vodál | ||||||
1146 | Vološčuk | ||||||
1147 | Vološín | ||||||
1148 | Votroubek | ||||||
1149 | Vrbovský | ||||||
1150 | Vrunay | ||||||
1151 | Wagner | ||||||
1152 | Wahley | ||||||
1153 | Weisenpacher | ||||||
1154 | Wenger | ||||||
1155 | Witcherley | ||||||
1156 | Záhorec | ||||||
1157 | Zahorec | ||||||
1158 | Zachar | ||||||
1159 | Zajac | ||||||
1160 | Zajak | ||||||
1161 | Zambory | ||||||
1162 | Zaňák | ||||||
1163 | Záturecký | ||||||
1164 | Zemančík | ||||||
1165 | Zemánek | ||||||
1166 | Zemko | ||||||
1167 | Zettlemoyer | ||||||
1168 | Zeyst | ||||||
1169 | Zibrín | ||||||
1170 | Zingor | ||||||
1171 | Zlevský | ||||||
1172 | Zlúky | ||||||
1173 | Zubák | ||||||
1174 | Zubal | ||||||
1175 | Zvara | ||||||
1176 | Žďársky | ||||||
1177 | Žemlička | ||||||
1178 | Žiak | ||||||
1179 | Žila | ||||||
1180 | Žilík | ||||||
1181 | ); | ||||||
1182 | |||||||
1183 | # Last female names. | ||||||
1184 | our @last_female = qw( | ||||||
1185 | Balážová | ||||||
1186 | Balogová | ||||||
1187 | Horváthová | ||||||
1188 | Kováčová | ||||||
1189 | Lukáčová | ||||||
1190 | Molnárová | ||||||
1191 | Nagyová | ||||||
1192 | Szabová | ||||||
1193 | Tóthová | ||||||
1194 | Vargová | ||||||
1195 | ); | ||||||
1196 | |||||||
1197 | # Get random first male name. | ||||||
1198 | sub first_male { | ||||||
1199 | 3 | 3 | 1 | 176 | return $first_male[rand @first_male]; | ||
1200 | } | ||||||
1201 | |||||||
1202 | # Get random first female name. | ||||||
1203 | sub first_female { | ||||||
1204 | 2 | 2 | 1 | 134 | return $first_female[rand @first_female]; | ||
1205 | } | ||||||
1206 | |||||||
1207 | # Get random last male name. | ||||||
1208 | sub last_male { | ||||||
1209 | 3 | 3 | 1 | 139 | return $last_male[rand @last_male]; | ||
1210 | } | ||||||
1211 | |||||||
1212 | # Get random last female name. | ||||||
1213 | sub last_female { | ||||||
1214 | 2 | 2 | 1 | 128 | return $last_female[rand @last_female]; | ||
1215 | } | ||||||
1216 | |||||||
1217 | # Get random middle male name. | ||||||
1218 | sub middle_male { | ||||||
1219 | 3 | 3 | 1 | 130 | return $middle_male[rand @middle_male]; | ||
1220 | } | ||||||
1221 | |||||||
1222 | # Get random middle female name. | ||||||
1223 | sub middle_female { | ||||||
1224 | 2 | 2 | 1 | 125 | return $middle_female[rand @middle_female]; | ||
1225 | } | ||||||
1226 | |||||||
1227 | # Get random name. | ||||||
1228 | sub name { | ||||||
1229 | 3 | 3 | 1 | 5993 | my $sex = shift; | ||
1230 | 3 | 100 | 100 | 19 | if (defined $sex && $sex eq 'female') { | ||
1231 | 1 | 3 | return first_female().$SPACE.middle_female().$SPACE.last_female(); | ||||
1232 | } else { | ||||||
1233 | 2 | 9 | return first_male().$SPACE.middle_male().$SPACE.last_male(); | ||||
1234 | } | ||||||
1235 | } | ||||||
1236 | |||||||
1237 | 1; | ||||||
1238 | |||||||
1239 | __END__ |