Branch Coverage

blib/lib/MongoDB/_Protocol.pm
Criterion Covered Total %
branch 10 90 11.1


line true false branch
143 1 0 if (defined $ident) { }
154 1 3 $_ eq $ident ? :
195 1 2 if ($type == 0) { }
2 0 elsif ($type == 1) { }
232 0 14 unless ($pl_size == length $payload)
236 6 8 if ($type == 0) { }
8 0 elsif ($type == 1) { }
292 0 0 if ($flags)
295 0 0 $flags->{'checksum_present'} ? :
0 0 $flags->{'more_to_come'} ? :
321 0 0 unless eval { do { require Compress::Zstd } }
326 0 0 unless eval { do { require Compress::Snappy } }
345 0 0 if ($name eq 'none') { }
0 0 elsif ($name eq 'snappy') { }
0 0 elsif ($name eq 'zlib') { }
0 0 elsif ($name eq 'zstd') { }
360 0 0 if defined $level and $level < 0
365 0 0 defined $level ? :
413 0 0 if $op_code != 2012
418 0 0 unless my $decompressor = $DECOMPRESSOR[$comp_id]
451 0 0 if ($flags)
454 0 0 $flags->{'upsert'} ? :
0 0 $flags->{'multi'} ? :
481 0 0 if ($flags)
482 0 0 $flags->{'continue_on_error'} ? :
519 0 0 if ($flags)
525 0 0 $flags->{'tailable'} ? :
0 0 $flags->{'slave_ok'} ? :
0 0 $flags->{'await_data'} ? :
0 0 $flags->{'immortal'} ? :
0 0 $flags->{'partial'} ? :
530 0 0 defined $fields && length $fields ? :
577 0 0 if ($flags)
578 0 0 $flags->{'just_one'} ? :
639 0 0 if length $msg < 36
652 0 0 if (length $msg < $len or $opcode != 1 and $opcode != 2013 or $response_to != $request_id)
654 0 0 if (length $msg < $len)
658 0 0 if ($opcode != 1 and $opcode != 2013)
662 0 0 if ($response_to != $request_id)
672 0 0 if ($opcode == 2013) { }
697 0 0 $cursor_id eq "\000\000\000\000\000\000\000\000" ? :
728 0 0 if (ref $cursor_id eq 'MongoDB::_CursorID') { }
0 0 elsif (ref $cursor_id eq 'Math::BigInt') { }
735 0 0 if $len < 16
742 0 0 $] lt '5.010' ? :