Branch Coverage

blib/lib/App/Iptables2Dot.pm
Criterion Covered Total %
branch 49 54 90.7


line true false branch
108 9 0 if (open my $input, '<', $fname) { }
134 0 0 if ($opt->{'edgelabel'} and $edge->[2])
137 94 5 unless ($edge->[1] =~ /$re_it/)
142 3 96 if ($opt->{'use-numbered-nodes'})
146 86 13 if ($opt->{'showrules'}) { }
147 3 83 if (my $ot = $opt->{'omittargets'}) { }
150 1 2 unless $omit{$edge->[1]}
158 9 4 unless ($seen{$etext}++)
163 7 3 if ($opt->{'showrules'} or $opt->{'edgelabel'}) { }
168 2 7 1 < $seen{$_} ? :
185 8 1 unless ($opt->{'showunusednodes'} or $opt->{'use-numbered-nodes'})
191 41 3 unless $used{$node} or $opt->{'showunusednodes'} or $opt->{'use-numbered-nodes'}
194 47 9 if ($opt->{'showrules'})
203 3 53 if ($opt->{'use-numbered-nodes'}) { }
246 8 1 unless ($opt->{'showunusednodes'} or $opt->{'use-numbered-nodes'})
252 41 3 unless $used{$node} or $opt->{'showunusednodes'} or $opt->{'use-numbered-nodes'}
253 19 37 if (not $have_node{$node} and $node =~ /$re_in/)
254 1 18 if ($opt->{'use-numbered-nodes'}) { }
276 14 269 if $line =~ /^#.*$/
277 12 257 if $line =~ /^COMMIT$/
279 16 241 if ($line =~ /^\*(\S+)$/) { }
110 131 elsif ($line =~ /^:(\S+)\s.+$/) { }
131 0 elsif ($line =~ /^-A\s(\S+)\s(.+)$/) { }
287 96 14 unless ($self->{'nodemap'}{$1})
298 130 1 if ($ret) { }
301 94 36 unless ($target =~ /^(ACCEPT|DROP|REJECT)$/)
302 0 94 unless ($self->{'nodemap'}{$1})