| line |
true |
false |
branch |
|
174
|
0 |
1 |
unless my $raw = $self->SUPER::pack('CCnCCn', $self->version, $self->type, $self->flags, $self->code, $self->tlvCount, $self->length) |
|
184
|
0 |
0 |
unless $raw .= $tlv->pack |
|
193
|
0 |
1 |
unless my($version, $type, $flags, $code, $tlvCount, $length, $payload) = $self->SUPER::unpack('CCnCCn a*', $self->raw) |
|
204
|
1 |
0 |
if (defined $payload and CORE::length $payload >= $length) |
|
229
|
0 |
0 |
if ($self->type == 1 or $self->type == 2) { } |
|
|
0 |
0 |
elsif ($self->type == 3 or $self->type == 4) { } |
|
236
|
0 |
0 |
if ($self->type == 3 and $self->flags == 0) { } |
|
|
0 |
0 |
elsif ($self->type == 4 and $self->flags == 0) { } |
|
258
|
0 |
0 |
if ($self->flags & $flag) |