Branch Coverage

blib/lib/PlackX/Framework/Response.pm
Criterion Covered Total %
branch 21 28 75.0


line true false branch
9 0 1 unless $_[0]
17 0 27 $self->stream ? :
34 2 43 unless (defined $newval)
37 2 2 if $el =~ /^charset=(.*)$/u
40 45 0 if (defined $newval)
49 2 1 defined $newval ? :
3 103 if not $self->{'charset'} or $newval and $newval =~ /charset=/iu
54 42 61 defined $newval ? :
72 7 75 if ($self->stream_writer)
74 1 6 if $self->body
83 0 0 $bool ? :
91 3 1 $value ? :
95 1 3 if ref $value
117 0 0 if (my $sub = $self->can("render_$type"))