Branch Coverage

blib/lib/Net/Routing/FreeBSD.pm
Criterion Covered Total %
branch 43 50 86.0


line true false branch
25 3 0 if (-f "$path/netstat")
30 0 3 unless (length $bin)
61 1 30 if ($line =~ /^\s*destination\s+gateway\s+flags\s+netif\s+expire\s*$/i) { }
2 28 elsif ($line =~ /^\s*destination\s+gateway\s+flags\s+refs\s+use\s+netif\s+expire\s*$/i) { }
77 15 13 if ($freebsd_version eq '9.x') { }
94 19 6 if (defined $route and defined $gateway and defined $interface)
98 3 16 if ($route eq 'default')
101 10 9 if ($gateway =~ /^link/)
120 3 16 unless ($gateway =~ /^[0-9\.]+$/ and $route =~ m[^[0-9\.]+(?:/\d+)?$])
132 0 16 if ($@)
146 3 13 if ($route eq '0.0.0.0/0')
152 10 6 if ($gateway eq '0.0.0.0')
157 0 16 unless ($route{'route'} =~ m[/\d+$])
162 16 0 unless (exists $cache{$id})
204 49 6 if (defined $route and defined $gateway and defined $interface)
206 38 11 if ($gateway =~ /^link/ or $gateway eq '::1')
209 1 48 if ($route eq 'default')
216 2 47 if ($gateway =~ /^[a-f0-9]{1,2}:[a-f0-9]{1,2}:[a-f0-9]{1,2}:[a-f0-9]{1,2}:[a-f0-9]{1,2}:[a-f0-9]{1,2}$/i)
223 2 0 unless (exists $cache{$id})
230 10 39 unless ($route =~ m[^[0-9a-f:/]+$]i and $gateway =~ m[^[0-9a-f:/]+$]i)
241 2 37 if ($@)
255 1 36 if ($route eq '::/0')
261 36 1 if ($gateway eq '::')
266 14 23 unless ($route{'route'} =~ m[/\d+$])
271 37 0 unless (exists $cache{$id})