Branch Coverage

blib/lib/Net/Frame/Layer/ICMPv6.pm
Criterion Covered Total %
branch 2 60 3.3


line true false branch
125 0 0 if ($sType eq 128 and $wType eq 129) { }
0 0 elsif ($sType eq 135 and $wType eq 136) { }
0 0 elsif ($sType eq 133 and $wType eq 134) { }
145 0 1 unless my $raw = $self->SUPER::pack('CCn', $self->type, $self->code, $self->checksum)
155 0 1 unless my($type, $code, $checksum, $payload) = $self->SUPER::unpack('CCn a*', $self->raw)
180 0 0 if (not $icmpType and $l->layer =~ /ICMPv6::/)
181 0 0 if (not $ip and $l->layer eq 'IPv6')
182 0 0 if (not $rh0 and $l->layer eq 'IPv6::Routing')
183 0 0 if (not $hbh and $l->layer eq 'IPv6::HopByHop')
184 0 0 if (not $dst and $l->layer eq 'IPv6::Destination')
185 0 0 if (not $mob and $l->layer eq 'IPv6::Mobility')
187 0 0 if ($l->can('nextHeader'))
189 0 0 if ($l->layer eq 'IPv6::Fragment')
196 0 0 if ($rh0 and $rh0->segmentsLeft != 0)
204 0 0 if ($fragmentFlag)
207 0 0 if ($hbh)
210 0 0 if ($dst)
213 0 0 if ($mob)
222 0 0 unless my $packed = $self->SUPER::pack('a*a*NNCCna*', inet6Aton($ip->src), inet6Aton($lastIpDst), $ipPayloadLength, $v32->to_Dec, $self->type, $self->code, 0, $icmpType->pack)
236 0 0 if $self->nextLayer
238 0 0 if ($self->payload)
243 0 0 if ($type eq 128 or $type eq 129) { }
0 0 elsif ($type eq 135) { }
0 0 elsif ($type eq 136) { }
0 0 elsif ($type eq 133) { }
0 0 elsif ($type eq 134) { }
0 0 elsif ($type eq 1) { }
0 0 elsif ($type eq 3) { }
0 0 elsif ($type eq 2) { }
0 0 elsif ($type eq 4) { }