| line |
true |
false |
branch |
|
21
|
11 |
9 |
@_ == 0 ? : |
|
23
|
2 |
7 |
$& eq ' ' ? : |
|
29
|
1 |
2 |
@_ == 0 ? : |
|
37
|
5 |
17 |
if (ref $x eq 'HASH') { } |
|
|
4 |
13 |
elsif (ref $x eq 'ARRAY') { } |
|
|
1 |
12 |
elsif (not defined $x) { } |
|
|
5 |
7 |
elsif ($x eq 1) { } |
|
40
|
2 |
3 |
defined $key ? : |
|
63
|
0 |
0 |
if ($x =~ /^[\x{410}-\x{42f}\x{401}\x{430}-\x{44f}\x{451}][\x{430}-\x{44f}\x{451}]*$/u) { } |
|
69
|
1 |
9 |
@_ == 0 ? : |
|
71
|
1 |
9 |
if utf8::is_utf8($param) |
|
82
|
0 |
10 |
if ($@) |
|
86
|
0 |
0 |
_bohemy($koi) > _bohemy($cp) ? : |
|
94
|
0 |
6 |
if (ref $$x eq 'ARRAY') { } |
|
|
0 |
6 |
elsif (ref $$x eq 'HASH') { } |
|
100
|
1 |
0 |
@_ == 0 ? : |
|
113
|
5 |
10 |
if (exists $+{'key1'}) { } |
|
|
7 |
3 |
elsif (exists $+{'key'}) { } |
|
|
3 |
0 |
elsif (exists $+{'val'}) { } |
|
114
|
3 |
2 |
unless $was_val |
|
120
|
6 |
1 |
if ($+{'key'} eq '' or int $+{'key'} eq $+{'key'}) { } |
|
121
|
0 |
6 |
if ref $$x ne "ARRAY" and defined $$x |
|
127
|
0 |
1 |
if ref $$x ne "HASH" and defined $$x |
|
138
|
0 |
1 |
unless $was_val |
|
175
|
11 |
4 |
unless (exists $link{'path'}) |
|
176
|
0 |
11 |
$onpage{'path'} =~ m[/\z]u ? : |
|
180
|
1 |
14 |
if (exists $link{'proto'}) { } |
|
|
1 |
13 |
elsif (exists $link{'domain'}) { } |
|
186
|
0 |
13 |
if exists $onpage{'user'} |
|
187
|
0 |
13 |
if exists $onpage{'pass'} |
|
200
|
0 |
18 |
if ($p eq '.') { } |
|
|
0 |
18 |
elsif ($p eq '..') { } |
|
210
|
9 |
6 |
if (@p) { } |
|
|
0 |
6 |
elsif ($dir) { } |
|
212
|
1 |
8 |
if ($link{'path'} =~ m[[^/]*\.[^/]*\z]u) { } |
|
|
0 |
8 |
elsif ($dir) { } |
|
232
|
1 |
0 |
exists $link{'pass'} ? : |
|
|
1 |
14 |
exists $link{'user'} || exists $link{'pass'} ? : |
|
|
3 |
12 |
length $link{'query'} ? : |
|
|
1 |
14 |
length $link{'hash'} ? : |