blib/lib/Protocol/BitTorrent/Message.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 7 | 14 | 50.0 |
line | true | false | branch |
---|---|---|---|
72 | 0 | 11 | unless defined $buffer and length $$buffer >= 4 |
78 | 1 | 10 | unless ($len) |
84 | 0 | 10 | unless length $$buffer >= $len |
90 | 0 | 10 | unless my $class_name = $class->class_name_by_type($type_id) |
98 | 6 | 4 | $len ? : |
131 | 0 | 0 | unless my $type = $self->type |
132 | 0 | 0 | unless exists $id_for_type{$type} |