File Coverage

blib/lib/Parse/Netstat/darwin.pm
Criterion Covered Total %
statement 12 12 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod 1 1 100.0
total 18 18 100.0


line stmt bran cond sub pod time code
1             package Parse::Netstat::darwin;
2              
3             our $DATE = '2017-02-10'; # DATE
4             our $VERSION = '0.14'; # VERSION
5              
6 1     1   22 use 5.010001;
  1         2  
7 1     1   5 use strict;
  1         1  
  1         22  
8 1     1   3 use warnings;
  1         1  
  1         23  
9              
10 1     1   3 use Exporter;
  1         1  
  1         154  
11             our @ISA = qw(Exporter);
12             our @EXPORT_OK = qw(parse_netstat);
13              
14             our %SPEC;
15              
16             require Parse::Netstat::freebsd;
17              
18             $SPEC{parse_netstat} = do {
19             my $meta = { %{ $Parse::Netstat::freebsd::SPEC{parse_netstat} } };
20             $meta->{summary} = 'Parse the output of Mac OS X "netstat" command',
21             $meta->{description} = <<'_';
22              
23             Netstat can be called with `-n` (show raw IP addresses and port numbers instead
24             of hostnames or port names) or without. It can be called with `-a` (show all
25             listening and non-listening socket) option or without.
26              
27             _
28             $meta;
29             };
30             sub parse_netstat {
31 4     4 1 7 Parse::Netstat::freebsd::parse_netstat(@_);
32             }
33             1;
34             # ABSTRACT: Parse the output of Mac OS X "netstat" command
35              
36             __END__