Branch Coverage

blib/lib/Parse/Netstat/linux.pm

Criterion	Covered	Total	%
branch	10	14	71.4

line	true	false	branch
49	0	4	unless my $output = $args{'output'}
61	30	54	if ($line =~ /^tcp/ and $tcp) { }
	12	42	elsif ($line =~ /^udp/ and $udp) { }
	9	33	elsif ($line =~ /^unix/ and $unix) { }
64	0	30	unless $line =~ m[^(?Ptcp[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
75	0	12	unless $line =~ m[^(?Pudp[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
90	0	9	unless $line =~ m(^(?Punix) \s+ (?P\d+) \s+  \[\s*(?P\S*)\s*\] \s+ (?P\S+) \s+  (?P\S+|\s+) \s+ (?P\d+) \s+  (?: (?: (?P\d+)/(?P.+?) | - ) \s+)?  (?P.*?)\s*$)x