Branch Coverage

lib/Net/FastCGI/Protocol/PP.pm
Criterion Covered Total %
branch 159 160 99.3


line true false branch
54 57 39 if @_ > 1
61 1 109 unless @_ == 4
66 1 60 unless @_ == 1
67 2 58 unless defined $_[0] and length $_[0] >= 8
69 2 56 unless vec($_[0], 0, 8) == 1
71 54 2 if wantarray
82 1 16 unless @_ == 2
87 1 10 unless @_ == 1
88 2 8 unless defined $_[0] and length $_[0] >= 8
96 1 16 unless @_ == 2
101 1 11 unless @_ == 1
102 2 9 unless defined $_[0] and length $_[0] >= 8
110 1 16 unless @_ == 1
115 1 17 unless @_ == 1
116 2 15 unless defined $_[0] and length $_[0] >= 8
124 1 10 unless @_ == 3
133 1 9 unless @_ == 3
142 1 2 unless @_ == 1
149 3 57 unless @_ == 2 or @_ == 3
152 54 3 defined $_[2] ? :
155 1 56 unless $content_length <= 65535
160 43 13 if ($content_length)
164 8 48 if ($padding_length)
172 1 52 unless @_ == 1
175 0 52 unless length $_[0] >= 8 + $content_length
179 19 33 wantarray ? :
185 2 62 unless @_ == 3
188 60 2 defined $_[2] ? :
190 13 49 unless $content_length <= 65535
194 5 44 if ($type == 1) { }
3 41 elsif ($type == 2) { }
5 36 elsif ($type == 3) { }
22 14 elsif ($type == 4 or $type == 5 or $type == 6 or $type == 7 or $type == 8) { }
8 6 elsif ($type == 9 or $type == 10) { }
4 2 elsif ($type == 11) { }
195 3 2 unless $request_id != 0 and $content_length == 8
200 2 1 unless $request_id != 0 and $content_length == 0
204 3 2 unless $request_id != 0 and $content_length == 8
214 10 12 unless $request_id != 0
216 5 7 $content_length ? :
220 4 4 unless $request_id == 0
225 3 1 unless $request_id == 0 and $content_length == 8
231 1 1 if $content_length
241 1 36 unless @_ == 3 or @_ == 4
244 28 8 defined $_[2] ? :
247 15 21 if ($len)
248 11 4 if ($len < 32760) { }
260 2 2 if ($len)
266 31 5 if ($terminate)
274 1 30 unless @_ == 1
279 49 1 defined $_ ? :
280 45 5 $len < 128 ? :
283 24 1 if defined $val
289 1 16 unless @_ == 1
292 1 15 unless defined $octets
298 2 38 unless 1 <= length $octets
301 34 4 if $_ < 128
302 2 2 unless 3 <= length $octets
306 4 12 unless $klen + $vlen <= length $octets
315 1 28 unless @_ == 1
316 1 27 unless defined $_[0]
322 2 54 unless ($off += 1) <= $len
325 47 7 if $_ < 128
326 2 5 unless ($off += 3) <= $len
330 7 17 unless ($off += $klen + $vlen) <= $len
337 5 8 unless @_ >= 4 and @_ <= 6
343 6 2 if (@_ > 4)
345 3 3 if (@_ > 5)
353 4 7 unless @_ >= 3 and @_ <= 5
357 6 1 if (@_ > 3)
359 3 3 if (@_ > 4)
368 2 19 unless @_ == 1
369 10 9 unless defined $_[0] and length $_[0] >= 8
376 1 15 unless @_ == 1
382 1 14 unless @_ == 1
393 1 6 unless @_ == 1
401 1 14 unless @_ == 1
411 1 88 unless @_ == 1
417 1 10 unless @_ == 1
423 1 10 unless @_ == 1