Branch Coverage

blib/lib/SNMP/Trapinfo.pm
Criterion Covered Total %
branch 57 58 98.2


line true false branch
15 13 170 if $attr =~ /^DESTROY$/
16 41 129 if (@_) { }
25 1 13 unless $data
44 0 3 if ($_[0] and ref \$_[0] eq 'SCALAR')
48 2 1 if ref $_[0] eq 'HASH'
50 2 1 if ($opts->{'hide_passwords'})
65 1 55 unless defined $string
70 23 36 if ($action and $line) { }
1 35 elsif ($key eq 'DUMP') { }
3 32 elsif ($key eq 'TRAPNAME') { }
1 31 elsif ($key eq 'HOSTIP') { }
72 8 15 unless (defined $newval)
84 7 24 if ($key =~ /\*/) { }
86 1 6 unless (defined $newval)
91 4 20 unless (defined $newval)
124 4 18 if ($@) { }
127 12 6 $rc ? :
136 39 38 unless @possible == @parts
138 9 46 if $parts[$i] eq '*'
139 31 15 if ($parts[$i] ne $possible[$i])
152 57 50 if ($string =~ /^[A-Za-z].*\:\:[A-Za-z].*$/)
154 51 6 unless ($string =~ /\d\.\d+$/)
165 3 10 if (ref \$data eq 'GLOB') { }
8 2 elsif (ref \$data eq 'REF') { }
174 2 8 if ($opts->{'hide_passwords'})
183 1 9 unless @packet
198 3 57 unless defined $key
200 50 7 if ($key ne 'SNMPv2-MIB::snmpTrapOID')
213 1 1 if ($self->trapname =~ /\.\d+$/) { }