Branch Coverage

blib/lib/Metabase/Client/Simple.pm
Criterion Covered Total %
branch 13 38 34.2


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') { }