line |
true |
false |
branch |
18
|
1 |
5 |
unless my $carrier = $args{'carrier'} |
19
|
1 |
4 |
unless my $number = $args{'number'} |
26
|
2 |
2 |
$carrier eq 'kddi' ? : |
28
|
3 |
1346 |
if ($$row{'number'} eq $number) |
56
|
6 |
16 |
$carrier eq 'kddi' ? : |
58
|
0 |
7801 |
unless exists $$row{'name'} |
59
|
10 |
7791 |
if (hex $$row{$key} == $$self{'unicode'}) |
74
|
3 |
9 |
$carrier eq 'kddi' ? : |
76
|
1226 |
2070 |
unless exists $$row{'name_en'} |
77
|
5 |
2065 |
if (hex $$row{$key} == $$self{'unicode'}) |
92
|
4 |
7 |
$carrier eq 'kddi' ? : |
94
|
0 |
4779 |
unless exists $$row{'number'} |
95
|
4 |
4775 |
if (hex $$row{$key} == $$self{'unicode'}) |
110
|
1 |
2291 |
unless $carrier |
111
|
1 |
2290 |
unless $carrier =~ /^[IEVH]$/ |
116
|
1527 |
4249 |
if (my $row = $$fallback_name_cache{$from}{sprintf '%X', $$self{'unicode'}}{$carrier}) |
117
|
1059 |
468 |
if ($$row{'type'} eq 'name') { } |
130
|
1 |
2 |
if ($uni =~ /\p{InDoCoMoPictograms}/) { } |
|
1 |
1 |
elsif ($uni =~ /\p{InSoftBankPictograms}/) { } |
|
1 |
0 |
elsif ($uni =~ /\p{InKDDIAutoPictograms}/) { } |