| line |
true |
false |
branch |
|
35
|
1 |
2 |
unless substr($$args{'uri'}, -1) eq '/' |
|
39
|
0 |
3 |
unless ($self->profile->isa('Metabase::User::Profile')) |
|
42
|
0 |
3 |
unless ($self->secret->isa('Metabase::User::Secret')) |
|
47
|
1 |
2 |
unless ($self->_ua->is_protocol_supported($scheme)) |
|
49
|
0 |
1 |
if ($scheme eq 'https') |
|
60
|
3 |
2 |
unless ($$self{'_ua'}) |
|
76
|
0 |
0 |
unless $fact->creator |
|
91
|
0 |
0 |
if ($res->code == 401) |
|
92
|
0 |
0 |
if ($self->guid_exists($self->profile->guid)) |
|
100
|
0 |
0 |
unless ($res->is_success) |
|
121
|
0 |
0 |
$res->is_success ? : |
|
131
|
0 |
0 |
unless $self->$type->creator |
|
146
|
0 |
0 |
unless ($res->is_success) |
|
162
|
0 |
0 |
@$args == 0 ? : |
|
|
3 |
0 |
@$args == 1 && ref $$args[0] ? : |
|
169
|
0 |
9 |
unless exists $$spec{$key} |
|
174
|
0 |
9 |
unless defined $$hash{$key} |
|
178
|
0 |
3 |
if @errors |
|
191
|
0 |
0 |
if (ref $res and $res->header('Content-Type') eq 'application/json') { } |