| line |
true |
false |
branch |
|
131
|
0 |
6 |
unless my $path = 'File::Spec'->canonpath(shift()) |
|
134
|
0 |
6 |
unless defined $_[0] and not ref $_[0] |
|
135
|
0 |
6 |
unless my $URI = 'URI'->new(shift(), 'http') |
|
136
|
6 |
0 |
unless length $URI->path |
|
157
|
1 |
2 |
if UNIVERSAL::isa(ref $_[0], 'HTML::Location') |
|
158
|
1 |
1 |
if @_ == 2 |
|
159
|
1 |
0 |
if (ref $_[0] eq 'ARRAY' and @{$_[0];}) |
|
232
|
0 |
1 |
unless my $new_uri = 'File::Spec::Unix'->catdir($$self{'URI'}->path, @args) |
|
233
|
0 |
1 |
unless my $new_path = 'File::Spec'->catdir($$self{'path'}, @args) |
|
258
|
0 |
1 |
unless my $uri = 'File::Spec::Unix'->catfile($$self{'URI'}->path, @args) |
|
259
|
0 |
1 |
unless my $fs = 'File::Spec'->catfile($$self{'path'}, @args) |
|
277
|
14 |
0 |
UNIVERSAL::isa(ref $_[0], 'HTML::Location') ? : |
|
278
|
10 |
4 |
UNIVERSAL::isa(ref $_[0], 'HTML::Location') ? : |
|
279
|
7 |
3 |
if $left->path eq $right->path |