line |
true |
false |
branch |
57
|
0 |
1 |
unless my $raw = $self->SUPER::pack('CCCCN', $self->nextHeader, $self->hdrExtLen, $self->routingType, $self->segmentsLeft, $self->reserved) |
63
|
0 |
1 |
unless $raw .= $self->SUPER::pack('a16', inet6Aton($_)) |
74
|
0 |
1 |
unless my($nextHeader, $hdrExtLen, $routingType, $segmentsLeft, $reserved, $rest) = $self->SUPER::unpack('CCCCN a*', $self->raw) |
86
|
0 |
1 |
unless my($address) = $self->SUPER::unpack('a16', substr($rest, 16 * ($_ - 1))) |
102
|
0 |
0 |
if (defined $arg) |
103
|
0 |
0 |
if ($arg =~ /^\d$/ and $arg == 0) { } |
119
|
0 |
0 |
if ($IPv6RoutingComputeSegmentsLeft) |
131
|
0 |
0 |
if $self->nextLayer |
133
|
0 |
0 |
if ($self->payload) |