Branch Coverage

blib/lib/Net/Frame/Layer/IPv6/Option.pm
Criterion Covered Total %
branch 7 20 35.0


line true false branch
31 0 0 if ($self->type == 0)
41 0 1 unless my $raw = $self->SUPER::pack('C', $self->type)
44 1 0 if ($self->type != 0)
45 0 1 unless $raw .= $self->SUPER::pack('Ca*', $self->length, $self->value)
55 0 1 unless my($type, $payload) = $self->SUPER::unpack('C a*', $self->raw)
59 1 0 if ($self->type != 0)
60 0 1 unless my($length, $tail) = $self->SUPER::unpack('C a*', $payload)
64 0 1 unless ($value, $payload) = $self->SUPER::unpack("a$length a*", $tail)
80 0 0 if ($self->type != 0)
93 0 0 if ($self->type == 0) { }