| line |
true |
false |
branch |
|
22
|
0 |
166 |
unless defined $name |
|
24
|
6 |
158 |
if $name eq '' or $name eq '.' or $name eq '..' |
|
43
|
158 |
0 |
if ($prefix =~ s/(?:\.[A-Za-z~][A-Za-z0-9~]*)*$//) { } |
|
61
|
0 |
1172 |
if $char =~ /\A[0-9]\z/ |
|
62
|
830 |
342 |
if $char =~ /\A[a-zA-Z]\z/ |
|
63
|
20 |
322 |
if $char eq '~' |
|
73
|
586 |
26 |
defined $achar ? : |
|
74
|
586 |
26 |
defined $bchar ? : |
|
76
|
86 |
526 |
if $charcmp |
|
83
|
0 |
102 |
unless $_[0] |
|
84
|
0 |
102 |
unless $_[1] |
|
88
|
5 |
145 |
unless defined $alex |
|
89
|
5 |
145 |
unless defined $blex |
|
91
|
86 |
64 |
if $lexcmp |
|
95
|
0 |
64 |
unless defined $anum and length $anum |
|
96
|
0 |
64 |
unless defined $bnum and length $bnum |
|
98
|
16 |
48 |
if $numcmp |
|
106
|
0 |
110 |
if $first->{'name'} eq $second->{'name'} |
|
110
|
4 |
1 |
if $first->{'special'} and $second->{'special'} |
|
111
|
1 |
105 |
if $first->{'special'} |
|
112
|
1 |
104 |
if $second->{'special'} |
|
115
|
1 |
103 |
if $first->{'hidden'} and not $second->{'hidden'} |
|
116
|
1 |
78 |
if not $first->{'hidden'} and $second->{'hidden'} |
|
119
|
18 |
84 |
if ($first->{'prefix'} eq $second->{'prefix'}) { } |