Branch Coverage

blib/lib/ASP4/Response.pm
Criterion Covered Total %
branch 6 18 33.3


line true false branch
33 5122 5122 if (@_) { }
49 6123 5122 if (@_)
67 5122 25629 @_ ? :
117 0 0 if ($args{'expires'})
119 0 0 if (my($num, $type) = $args{'expires'} =~ /^(\-?\d+)([MHD])$/) { }
122 0 0 if ($type eq 'M') { }
0 0 elsif ($type eq 'H') { }
0 0 elsif ($type eq 'D') { }
168 0 0 if $s->context->did_send_headers