Branch Coverage

blib/lib/Parse/Netstat/freebsd.pm
Criterion Covered Total %
branch 16 20 80.0


line true false branch
52 0 8 unless my $output = $args{'output'}
64 4 792 if ($line =~ /^Registered kernel control modules/) { }
78 714 elsif ($line =~ /^tcp/ and $tcp) { }
48 666 elsif ($line =~ /^udp/ and $udp) { }
93 573 elsif ($in_unix and $unix) { }
8 565 elsif ($in_unix_header) { }
8 557 elsif ($line =~ /^Active (UNIX|LOCAL \(UNIX\)) domain sockets/) { }
69 0 78 unless $line =~ m[^(?Ptcp(?:4|6|46)?) \s+ (?P\d+) \s+ (?P\d+)\s+ (?P\S+?)[:.](?P\w+)\s+ (?P\S+?)[:.](?P\w+|\*)\s+ (?P\S+) (?: \s+ (?: (?P\d+)/(?P.+?) | - ))? \s*$]x
81 0 48 unless $line =~ m[^(?Pudp(?:4|6|46)?) \s+ (?P\d+) \s+ (?P\d+) \s+ (?P\S+?)[:.](?P\w+|\*)\s+ (?P\S+?)[:.](?P\w+|\*) (?: \s+ (?P\S+)? (?: \s+ (?: (?P\d+)/(?P.+?) | - ))? )? \s*$]x
96 0 93 unless $line =~ /^(?P
\S+) \s+ (?P\S+) \s+ (?P\d+) \s+ (?P\d+) \s+ (?P[0-9a-f]+) \s+ (?P[0-9a-f]+) \s+ (?P[0-9a-f]+) \s+ (?P[0-9a-f]+) (?: \s+ (?P.+) )? \s*$/x