Branch Coverage

blib/lib/HTTP/Response/CGI.pm
Criterion Covered Total %
branch 9 14 64.2


line true false branch
24 5 0 if ($str =~ /^(.*)\n/) { }
33 1 4 if (not $self->protocol or $self->protocol =~ m[^HTTP/[\d\.]+]) { }
43 4 0 if ($header and $value)
45 4 0 if $value
50 1 3 if ($self->header('Status')) { }
54 1 0 if defined $code
55 1 0 if defined $message