Branch Coverage

lib/HTTP/Monkeywrench.pm
Criterion Covered Total %
branch 37 68 54.4


line true false branch
256 0 7 unless ref $self
257 1 6 if (my $settings = shift())
258 0 1 if $HTTP::Monkeywrench::debug
259 0 1 unless (ref $settings eq 'HASH')
264 3 3 defined $$settings{$_} ? :
285 1 0 unless (ref $self)
286 1 0 ref $_[0] eq 'HASH' ? :
303 2 1 $$click{'method'} ? :
307 3 0 if ($$click{'cookies'})
321 3 0 $r == 1 ? :
324 0 3 if ($$click{'sendcookie'} and $self->settings->{'show_cookies'})
338 1 2 if ($res->is_redirect or $res->is_success) { }
339 1 0 if $$click{'success_res'}
342 1 0 if ($res->content =~ /$sr/) { }
343 1 0 if $self->settings->{'match_detail'}
354 1 0 if $result
360 1 0 if $$click{'error_res'}
363 0 2 if ($res->content =~ /$er/) { }
368 2 0 if $self->settings->{'match_detail'}
375 2 0 if $result
402 0 1 if ($self->settings->{'send_mail'})
403 0 0 if ($self->settings->{'send_if_err'} == 0 or $self->settings->{'send_if_err'} == 1 and $res->code != 200 || $HTTP::Monkeywrench::totalerrs > 0)
405 0 0 unless $self->send_monkeymail($HTTP::Monkeywrench::content, $self->settings->{'smtp_server'}, $self->settings->{'send_mail'})
409 0 1 if $self->settings->{'print_results'}
424 0 3 $$click{'REDIRECT'} ? :
425 3 0 $method eq 'GET' ? :
427 3 0 if $$click{'auth'}
428 3 0 unless $$click{'REDIRECT'}
429 1 2 if $$click{'sendcookie'}
431 0 3 if $HTTP::Monkeywrench::debug
435 0 3 if $HTTP::Monkeywrench::debug
436 0 3 if $$click{'showhtml'}
438 0 3 if $$click{'acceptcookie'}
440 0 3 if ($res->is_redirect) { }