| line |
true |
false |
branch |
|
16
|
6 |
7 |
if defined $URI::file::DEFAULT_AUTHORITY |
|
19
|
1 |
6 |
if $_[0] =~ s/^\\\\([^\\]+)// |
|
20
|
0 |
6 |
if $_[0] =~ s[^//([^/]+)][] |
|
22
|
1 |
5 |
if ($_[0] =~ s/^([a-zA-Z]:)//) |
|
24
|
1 |
0 |
unless $_[0] =~ m[^[\\/]] |
|
37
|
6 |
7 |
if (defined $URI::file::DEFAULT_AUTHORITY) |
|
55
|
11 |
15 |
if (defined $auth) { } |
|
57
|
3 |
8 |
if ($auth =~ /^([a-zA-Z])[:|](relative)?/) { } |
|
|
2 |
6 |
elsif (lc $auth eq 'localhost') { } |
|
|
2 |
4 |
elsif (length $auth) { } |
|
59
|
1 |
2 |
if $2 |
|
71
|
0 |
55 |
if /\0/ |
|
72
|
0 |
55 |
if m[/] |
|
75
|
0 |
26 |
unless $class->fix_path(@path) |
|
78
|
1 |
25 |
if $rel |