Branch Coverage

lib/HTTP/Promise/Body/Form/Data.pm
Criterion Covered Total %
branch 12 54 22.2


line true false branch
35 0 0 unless $self->SUPER::init(@_)
46 0 1 unless defined $parts
51 0 4 unless defined $part
54 1 0 if $res->length
66 0 0 if ($self->_is_a($v, "HTTP::Promise::Body::Form::Field"))
70 0 0 unless defined $v
72 0 0 if (exists $hash->{$n}) { }
74 0 0 if ref $hash->{$n} ne "ARRAY"
87 0 0 if ($self->_is_array($v)) { }
91 0 0 unless &$process($n, $v2)
96 0 0 unless &$process($n, $v)
99 0 0 unless $self->_load_class("HTTP::Promise::Body::Form")
114 0 0 defined $order && scalar @$order ? :
1 0 $self->_is_array($opts->{'fields'}) ? :
117 0 1 unless $self->_load_class("HTTP::Promise::Entity")
118 0 1 unless $self->_load_class("HTTP::Promise::Headers")
125 4 0 if ($self->_is_a($v, 'HTTP::Promise::Body::Form::Field')) { }
136 0 0 unless (defined $body)
142 4 0 $dispo ? :
145 0 4 unless defined $cd
148 0 4 if ($self->_is_a($body, "HTTP::Promise::Body::File") and not $cd->filename)
165 0 4 if (ref $v eq 'ARRAY') { }
189 0 4 unless $self->_load_class("HTTP::Promise::Body::Form::Field")
199 0 0 unless defined $s
213 0 0 unless $self->_is_glob($fh)
215 0 0 unless defined $encoded
216 0 0 unless print $fh $$encoded