File Coverage

blib/lib/P9Y/ProcessTable.pm
Criterion Covered Total %
statement 13 17 76.4
branch n/a
condition n/a
subroutine 5 7 71.4
pod 4 4 100.0
total 22 28 78.5


line stmt bran cond sub pod time code
1             package P9Y::ProcessTable;
2              
3             our $AUTHORITY = 'cpan:BBYRD'; # AUTHORITY
4             our $VERSION = '1.06_01'; # VERSION
5             # ABSTRACT: Portably access the process table
6              
7 3     3   358353 use strict;
  3         4  
  3         86  
8 3     3   11 use warnings;
  3         4  
  3         78  
9              
10 3     3   1271 use P9Y::ProcessTable::Table;
  3         21  
  3         532  
11              
12             my $pptt = P9Y::ProcessTable::Table->new;
13              
14             #############################################################################
15             # Methods
16              
17 0     0 1 0 sub fields { shift; $pptt->fields; }
  0         0  
18 0     0 1 0 sub list { shift; $pptt->list; }
  0         0  
19 1     1 1 199 sub table { shift; $pptt->table; }
  1         12  
20 3     3 1 5175 sub process { shift; $pptt->process(@_); }
  3         68  
21              
22             42;
23              
24             __END__