line |
true |
false |
branch |
15
|
0 |
6 |
unless -d $dir |
17
|
0 |
6 |
@_ % 2 == 1 ? : |
21
|
0 |
6 |
unless open my $fh, '<', $file |
38
|
5 |
0 |
if (defined $value) { } |
55
|
51 |
18 |
if (defined $value) { } |
62
|
9 |
60 |
$self->{'capitalize'} ? : |
65
|
0 |
36 |
wantarray ? : |
82
|
5 |
51 |
if ($self->{'unicode'}) |
87
|
2 |
49 |
if $value =~ s/\305\253/u/g |
88
|
0 |
51 |
if $value =~ s/\307\226/u/g |
89
|
0 |
51 |
if $value =~ s/\304\253/i/g |
90
|
1 |
50 |
if $value =~ s/\305\215/o/g |
91
|
0 |
51 |
if $value =~ s/\304\201/a/g |
92
|
2 |
49 |
if $value =~ s/\304\223/e/g |
94
|
0 |
51 |
if $value =~ s/\303\255/i/g |
95
|
5 |
46 |
if $value =~ s/\303\251/e/g |
96
|
2 |
49 |
if $value =~ s/\303\272/u/g |
97
|
0 |
51 |
if $value =~ s/\303\263/o/g |
98
|
1 |
50 |
if $value =~ s/\307\230/v/g |
99
|
4 |
47 |
if $value =~ s/\303\241/a/g |
101
|
0 |
51 |
if $value =~ s/\304\233/e/g |
102
|
6 |
45 |
if $value =~ s/\307\216/a/g |
103
|
6 |
45 |
if $value =~ s/\307\222/o/g |
104
|
0 |
51 |
if $value =~ s/\307\224/u/g |
105
|
1 |
50 |
if $value =~ s/\307\232/v/g |
106
|
6 |
45 |
if $value =~ s/\307\220/i/g |
108
|
0 |
51 |
if $value =~ s/\303\262/o/g |
109
|
6 |
45 |
if $value =~ s/\303\240/a/g |
110
|
0 |
51 |
if $value =~ s/\303\250/e/g |
111
|
0 |
51 |
if $value =~ s/\303\271/u/g |
112
|
1 |
50 |
if $value =~ s/\307\234/v/g |
113
|
8 |
43 |
if $value =~ s/\303\254/i/g |
115
|
34 |
17 |
unless $self->{'tone'} |