Branch Coverage

blib/lib/Metabase/Client/Simple.pm
Criterion Covered Total %
branch 12 36 33.3


line true false branch
49 1 2 unless substr($args->{'uri'}, -1) eq '/'
53 0 3 unless ($self->profile->isa('Metabase::User::Profile'))
56 0 3 unless ($self->secret->isa('Metabase::User::Secret'))
62 1 0 unless ($scheme eq 'http' or $scheme eq 'https' and $can_ssl)
64 0 1 if ($scheme eq 'https')
75 1 1 unless ($self->{'_ua'})
97 0 0 unless $fact->creator
120 0 0 if ($res->{'status'} == 401)
121 0 0 if ($self->guid_exists($self->profile->guid))
129 0 0 unless ($res->{'success'})
177 0 0 unless $self->$type->creator
195 0 0 unless ($res->{'success'})
212 0 0 @$args == 0 ? :
3 0 @$args == 1 && ref $args->[0] ? :
220 0 9 unless exists $spec->{$key}
225 0 9 unless defined $hash->{$key}
228 0 3 if @errors
241 0 0 if (ref $res and $res->{'headers'}{'content-type'} eq 'application/json') { }