File Coverage

blib/lib/Acme/MotorcycleGang.pm
Criterion Covered Total %
statement 57 57 100.0
branch 1 2 50.0
condition 1 2 50.0
subroutine 4 4 100.0
pod 1 1 100.0
total 64 66 96.9


line stmt bran cond sub pod time code
1             package Acme::MotorcycleGang;
2              
3 2     2   71549 use warnings;
  2         5  
  2         75  
4 2     2   11 use strict;
  2         3  
  2         98  
5             our $VERSION = '0.0.4';
6              
7 2     2   1433 use utf8;
  2         19  
  2         11  
8              
9             sub yorosiku {
10 6 50   6 1 35 my $class = shift if $_[0] eq __PACKAGE__; ## no critic
11 6   50     21 my $text = shift || "";
12              
13              
14 6         8 local $_ = $text;
15              
16 6         53 s/あいらぶゆう|あいらぶゆー|アイラブユウ|アイラブユー/愛羅武勇/g;
17 6         13 s/あいしてる/愛死天流/g;
18 6         11 s/ありがとう/阿離我妬/g;
19 6         10 s/いのち/魂/g;
20 6         9 s/おまわり/悪魔輪離/g;
21 6         10 s/かっとび/喝斗毘/g;
22 6         8 s/きまぐれ/鬼魔愚零/g;
23 6         9 s/きもんど/鬼門怒/g;
24 6         11 s/しゃこたん/車高短/g;
25 6         9 s/ぜんと/全塗/g;
26 6         10 s/だいすき/陀異守鬼/g;
27 6         9 s/でっぱつ/出発/g;
28 6         7 s/どらえもん/怒羅衛門/g;
29 6         9 s/ぶっちぎり/仏恥義理/g;
30 6         10 s/まくどなるど/魔苦怒奈流怒/g;
31 6         9 s/まじ/本気/g;
32 6         9 s/まぶだち/摩武駄致/g;
33 6         10 s/そうしそうあい/走死走愛/g;
34 6         8 s/よろしく/夜露死苦/g;
35 6         11 s/れっさ/烈怒鮫/g;
36              
37 6         13 s/あい/愛/g;
38              
39             # 23 districts in Tokyo
40 6         10 s/いたばし/威汰罵紫/g;
41 6         9 s/きた/鬼多/g;
42 6         9 s/ねりま/根離魔/g;
43 6         9 s/としま/斗指魔/g;
44 6         9 s/あだち/亞駄痴/g;
45 6         9 s/あらかわ/悪裸迦倭/g;
46 6         8 s/すみだ/酢巳駄/g;
47 6         8 s/こうとう/抗闘/g;
48 6         11 s/かつしか/喝紫迦/g;
49 6         9 s/えどがわ/獲怒我倭/g;
50 6         9 s/しぶや/士武矢/g;
51 6         10 s/めぐろ/女愚炉/g;
52 6         8 s/せたがや/背汰我屋/g;
53 6         15 s/みなと/魅那斗/g;
54 6         8 s/しながわ/紫那我倭/g;
55 6         9 s/おおた/皇汰/g;
56 6         7 s/なかの/那迦乃/g;
57 6         10 s/すぎなみ/酢魏那魅/g;
58 6         7 s/ぶんきょう/聞狂/g;
59 6         14 s/しんじゅく/神呪苦/g;
60 6         8 s/たいとう/隊闘/g;
61 6         8 s/ちゅうおう/忠皇/g;
62 6         20 s/ちよだ/恥酔駄/g;
63              
64              
65 6         54 $_;
66             }
67              
68             1;
69             __END__