File Coverage

lib/Rex/Constants.pm
Criterion Covered Total %
statement 12 17 70.5
branch n/a
condition n/a
subroutine 5 10 50.0
pod 0 6 0.0
total 17 33 51.5


line stmt bran cond sub pod time code
1             #
2             # (c) Jan Gehring
3             #
4              
5             package Rex::Constants;
6              
7 32     32   492 use v5.12.5;
  32         131  
8 32     32   196 use warnings;
  32         77  
  32         1811  
9              
10             our $VERSION = '1.14.2.2'; # TRIAL VERSION
11              
12             require Rex::Exporter;
13 32     32   255 use base qw(Rex::Exporter);
  32         81  
  32         2682  
14 32     32   271 use vars qw(@EXPORT);
  32         70  
  32         5262  
15              
16             @EXPORT = qw(present absent latest running started stopped);
17              
18 4     4 0 51 sub present { return "present"; }
19 0     0 0   sub absent { return "absent"; }
20 0     0 0   sub latest { return "latest"; }
21 0     0 0   sub running { return "running"; }
22 0     0 0   sub started { return "started"; }
23 0     0 0   sub stopped { return "stopped"; }
24              
25             1;