| blib/lib/URI/_generic.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % | 
| condition | 35 | 44 | 79.5 | 
| line | !l | l&&!r | l&&r | condition | 
|---|---|---|---|---|
| 106 | 41 | 318 | 211 | length $path and not $path =~ m[^[/?\#]] | 
| 109 | 23 | 129 | 0 | not length $pre and $path =~ m[^[^:/?\#]+:] | 
| 190 | 0 | 3 | 193 | @p and not length $p[0] | 
| 194 | 466 | 11 | 107 | $p[$i] eq ".." and $p[$i - 1] ne ".." | 
| 209 | 4 | 184 | 8 | @p and $p[-1] eq "." | 
| 211 | 0 | 3 | 9 | @p and $p[0] =~ /^\.\.?$/ | 
| 243 | 2 | 3 | 62 | $scheme eq $bscheme and $auth eq $bauth | 
| 268 | 51 | 7 | 4 | $path eq $bpath and defined $rel->fragment | 
| 58 | 3 | 1 | $path eq $bpath and defined $rel->fragment and not defined $rel->query | 
| line | l | !l | condition | 
|---|---|---|---|
| 50 | 49 | 270 | $user ||= "" | 
| line | l | !l&&r | !l&&!r | condition | 
|---|---|---|---|---|
| 160 | 274 | 0 | 0 | shift() || Carp::croak('Missing base argument') | 
| 220 | 67 | 0 | 0 | shift() || Carp::croak('Missing base argument') | 
| 229 | 67 | 0 | 0 | defined $scheme or defined $auth | 
| 259 | 48 | 11 | 78 | $i < 0 or $i != index($bpath, "/", $li) | 
| 59 | 3 | 75 | $i < 0 or $i != index($bpath, "/", $li) or substr($path, $li, $i - $li) ne substr($bpath, $li, $i - $li) |