| blib/lib/URI/WithBase.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 21 | 26 | 80.7 |
| line | true | false | branch |
|---|---|---|---|
| 19 | 9 | 84 | if ($base and &blessed($base) and $base->isa("URI::WithBase")) |
| 43 | 6 | 4 | if &blessed($other) and $other->isa("URI::WithBase") |
| 52 | 357 | 810 | if $method eq "DESTROY" |
| 58 | 2 | 0 | ref $self ? : |
| 2 | 0 | unless $self->SUPER::can(@_) | |
| 69 | 1 | 85 | if (@_) |
| 72 | 0 | 1 | if ref $new_base and $new_base->isa("URI::WithBase") |
| 75 | 1 | 85 | unless defined wantarray |
| 82 | 63 | 22 | if (defined $base and not ref $base) |
| 84 | 63 | 0 | unless @_ |
| 93 | 1 | 6 | if ref $base |
| 101 | 59 | 18 | if ref $base |
| 109 | 15 | 0 | if ref $base |