Branch Coverage

blib/lib/HTTP/Recorder.pm
Criterion Covered Total %
branch 0 136 0.0


line true false branch
158 0 0 if $file
168 0 0 if ($request->uri->host eq $self->{'control'}) { }
175 0 0 if (exists $arghash->{'updatescript'}) { }
0 0 elsif (exists $arghash->{'clearscript'}) { }
0 0 elsif (exists $arghash->{'goto'}) { }
190 0 0 if (exists $arghash->{'savescript'}) { }
207 0 0 unless $self->{'ignore_favicon'} and $request->uri->path =~ /favicon\.ico$/i
214 0 0 if ($content_type =~ m[^text/]i)
232 0 0 if (not $action) { }
0 0 elsif ($action eq 'follow') { }
0 0 elsif ($action eq 'submitform') { }
233 0 0 unless ($referer)
251 0 0 if ($param =~ /^$self->{'prefix'}-form(\d+)-(\w+)-(.*)$/)
255 0 0 if ($fieldtype eq 'submit') { }
256 0 0 unless $values->{$fieldname}
260 0 0 if $fieldtype eq 'hidden'
261 0 0 unless $fieldname and exists $values->{$fieldname}[0]
265 0 0 if ($fieldtype eq 'checkbox') { }
294 0 0 if ($action and $action eq 'submitform')
300 0 0 if ($https and $https == 1)
318 0 0 unless $content
337 0 0 if ($request->headers->content_type eq 'multipart/form-data')
341 0 0 unless $_
346 0 0 unless $fields[1]
348 0 0 unless exists $fields[2]
349 0 0 if ($fields[2] =~ /^filename/) { }
360 0 0 if ($request->method eq 'POST') { }
367 0 0 unless defined $content
371 0 0 if ($content =~ /=/ or $content =~ /&/)
378 0 0 defined $val ? :
381 0 0 if defined $val
408 0 0 if (@$token[0] eq 'S') { }
0 0 elsif (@$token[0] eq 'E') { }
0 0 elsif (@$token[0] eq 'PI') { }
414 0 0 if ($tagname eq 'head') { }
0 0 elsif ($in_head and $tagname eq 'base') { }
0 0 elsif ($tagname eq 'html') { }
0 0 elsif ($tagname eq 'a' || $tagname eq 'link' and $attrs->{'href'}) { }
0 0 elsif ($tagname eq 'form') { }
419 0 0 if ($self->{'showwindow'})
425 0 0 if (@$t[0] eq 'T') { }
434 0 0 if (defined $text) { }
435 0 0 unless exists $links{$text}
441 0 0 if ($attrs->{'href'} =~ /^javascript:/i) { }
444 0 0 if ($tagname eq 'a') { }
0 0 elsif ($tagname eq 'link') { }
464 0 0 if (not $js_href and $tagname ne 'form' and $formcount == 1)
469 0 0 if ($attrs->{'name'})
488 0 0 if ($tagname eq 'form')
489 0 0 if ($formcount == 1)
497 0 0 if ($tagname eq 'head')
498 0 0 unless ($basehref)
500 0 0 if $basehref->scheme eq 'https'
508 0 0 if ($tagname eq 'form') { }
0 0 elsif ($tagname eq 'a' or $tagname eq 'link') { }
538 0 0 if $url->scheme eq 'https'
545 0 0 if ($href =~ /^#/)
551 0 0 if $https
552 0 0 if $realargs
556 0 0 if $anchor
571 0 0 if $url->scheme eq 'https'
576 0 0 if ($href =~ /^#/)
582 0 0 if $https
583 0 0 if $realargs
585 0 0 if $anchor
597 0 0 if $url =~ /^https/i
602 0 0 if ($https)
615 0 0 unless $line