Branch Coverage

blib/lib/Net/Frame/Layer/IGMP/v3Report.pm
Criterion Covered Total %
branch 12 24 50.0


line true false branch
70 0 1 unless my $raw = $self->SUPER::pack('CCna4', $self->type, $self->auxDataLen, $self->numSources, inetAton($self->multicastAddress))
81 0 1 if ($self->auxData ne "\000")
82 0 0 unless $raw .= $self->SUPER::pack('a*', $self->auxData)
93 0 1 unless my($type, $auxDataLen, $numSources, $multicastAddress, $payload) = $self->SUPER::unpack('CCna4 a*', $self->raw)
104 0 0 if (defined $payload and length $payload >= 4)
114 0 0 if ($self->auxDataLen > 0 and defined $payload and length($payload) / 4 >= $self->auxDataLen)
128 0 1 if $self->nextLayer
130 0 1 if ($self->payload)
141 1 1 if ($self->auxData ne "\000" and $self->auxDataLen == 0)
143 1 0 if (my $mod = length($self->auxData) * 8 % 32)
154 1 1 if (scalar $self->sourceAddress and $self->numSources == 0)
177 2 3 if ($self->auxData ne "\000")