|  line  | 
 true  | 
 false  | 
 branch  | 
 
| 
51
 | 
 0  | 
 4  | 
 unless my $output = $args{'output'}  | 
 
| 
63
 | 
 30  | 
 54  | 
 if ($line =~ /^tcp/ and $tcp) { }  | 
 
| 
 | 
 12  | 
 42  | 
 elsif ($line =~ /^udp/ and $udp) { }  | 
 
| 
 | 
 9  | 
 33  | 
 elsif ($line =~ /^unix/ and $unix) { }  | 
 
| 
66
 | 
 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  | 
 
| 
77
 | 
 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  | 
 
| 
92
 | 
 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  |