Branch Coverage

blib/lib/Net/Packet/Utils.pm
Criterion Covered Total %
branch 0 46 0.0


line true false branch
49 0 0 unless $name
50 0 0 if $name =~ /^\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}$/
53 0 0 @addrs ? :
61 0 0 unless $name
62 0 0 if $name =~ /^\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}$/
65 0 0 @addrs ? :
73 0 0 unless $name
74 0 0 if Net::IPv6Addr::is_ipv6($name)
77 0 0 if (@res >= 5) { }
95 0 0 if $highPort < 1025
122 0 0 if length($phpkt) % 2
127 0 0 if $len % 2
159 0 0 unless Net::Libdnet::route_get(shift() || '1.1.1.1')
171 0 0 if $mac
176 0 0 if (Net::IPv4Addr::ipv4_in_network($env->subnet, $ip)) { }
195 0 0 unless $env
247 0 0 if (my $reply = $frame->recv)
253 0 0 if $mac
261 0 0 if ($mac)
282 0 0 if $err
287 0 0 if (Net::Pcap::lookupnet($d, \$net, \$mask, \$err) < 0)
298 0 0 unless keys %$dnet > 0
299 0 0 if $$dnet{'addr'}