Branch Coverage

blib/lib/Net/Duo.pm
Criterion Covered Total %
branch 14 26 53.8


line true false branch
54 10 0 if ($args_ref->{'key_file'})
58 0 10 if ($@)
66 0 30 unless (defined $self->{$key})
100 14 30 unless defined $args_ref
165 0 44 unless ($path =~ m[ \A / ]msux)
188 22 22 if ($method eq 'POST' or $method eq 'PUT') { }
13 9 elsif (not defined $args) { }
223 0 43 unless (defined $content)
224 0 0 if ($response->is_success) { }
235 0 43 if ($@)
236 0 0 if ($response->is_success) { }
245 0 43 if (not defined $data->{'stat'} or $data->{'stat'} ne 'OK')
250 0 43 unless (defined $data->{'response'})