| line |
true |
false |
branch |
|
50
|
1 |
2 |
unless substr($$args{'uri'}, -1) eq '/' |
|
54
|
0 |
3 |
unless ($self->profile->isa('Metabase::User::Profile')) |
|
57
|
0 |
3 |
unless ($self->secret->isa('Metabase::User::Secret')) |
|
62
|
1 |
2 |
unless ($self->_ua->is_protocol_supported($scheme)) |
|
64
|
0 |
1 |
if ($scheme eq 'https') |
|
75
|
3 |
2 |
unless ($$self{'_ua'}) |
|
100
|
0 |
0 |
unless $fact->creator |
|
115
|
0 |
0 |
if ($res->code == 401) |
|
116
|
0 |
0 |
if ($self->guid_exists($self->profile->guid)) |
|
124
|
0 |
0 |
unless ($res->is_success) |
|
154
|
0 |
0 |
$res->is_success ? : |
|
174
|
0 |
0 |
unless $self->$type->creator |
|
189
|
0 |
0 |
unless ($res->is_success) |
|
206
|
0 |
0 |
@$args == 0 ? : |
|
|
3 |
0 |
@$args == 1 && ref $$args[0] ? : |
|
213
|
0 |
9 |
unless exists $$spec{$key} |
|
218
|
0 |
9 |
unless defined $$hash{$key} |
|
222
|
0 |
3 |
if @errors |
|
235
|
0 |
0 |
if (ref $res and $res->header('Content-Type') eq 'application/json') { } |