Branch Coverage

blib/lib/Net/SNMP/Mixin/CiscoDot1qVlanStatic.pm
Criterion Covered Total %
branch 29 68 42.6


line true false branch
144 1 0 unless $session->{$prefix}{'__initialized'}
167 1 0 unless $session->{$prefix}{'__initialized'}
190 1 0 unless $session->{$prefix}{'__initialized'}
216 0 2 if exists get_init_slot($session)->{$prefix} and get_init_slot($session)->{$prefix} == 0 and not $reload
224 2 2 if $session->error
228 0 2 if $session->error
232 0 2 if $session->error
252 2 2 $session->nonblocking ? :
0 4 $session->version ? :
266 2 2 unless defined $result
267 2 0 if $session->nonblocking
284 2 0 unless (defined $vbl)
285 2 0 if (my $err_msg = $session->error)
304 0 0 unless $session->{$prefix}{'_VlanState'}{$vlan_id} == 1
324 2 0 $session->nonblocking ? :
0 2 $session->version ? :
344 0 2 unless defined $result
345 2 0 if $session->nonblocking
362 2 0 unless (defined $vbl)
363 2 0 if (my $err_msg = $session->error)
410 0 0 if ($session->{$prefix}{'_VlansEncapsOperType'}{$if_idx} != 4)
457 2 0 $session->nonblocking ? :
0 2 $session->version ? :
469 0 2 unless defined $result
470 2 0 if $session->nonblocking
487 2 0 unless (defined $vbl)
490 2 0 if (not $err_msg =~ /The requested entries are empty or do not exist/i) { }
491 2 0 if defined $err_msg
516 0 0 if $session->{$prefix}{'_VlanType'}{$if_idx} != 1
540 0 0 if (my $access_vlan = $session->{$prefix}{'AccessVlan'}{$if_idx})
541 0 0 if $access_vlan == $vlan_id
548 0 0 unless defined $session->{$prefix}{'TaggedVlans'}{$if_idx}
550 0 0 if (substr($session->{$prefix}{'TaggedVlans'}{$if_idx}, $vlan_id, 1) eq 1)
551 0 0 if ($session->{$prefix}{'NativeVlan'}{$if_idx} != $vlan_id) { }