File Coverage

blib/lib/Proc/tored/Pool/Constants.pm
Criterion Covered Total %
statement 21 21 100.0
branch n/a
condition n/a
subroutine 7 7 100.0
pod n/a
total 28 28 100.0


line stmt bran cond sub pod time code
1             package Proc::tored::Pool::Constants;
2             # ABSTRACT: Constants used by Proc::tored::Pool
3             $Proc::tored::Pool::Constants::VERSION = '0.06';
4 29     29   116 use strict;
  29         29  
  29         735  
5 29     29   142 use warnings;
  29         13  
  29         924  
6 29     29   5690 use parent 'Exporter';
  29         3214  
  29         116  
7              
8 29     29   1270 use constant assignment => 'assignment';
  29         77  
  29         1602  
9 29     29   100 use constant success => 'success';
  29         29  
  29         979  
10 29     29   87 use constant failure => 'failure';
  29         29  
  29         2157  
11              
12             BEGIN {
13 29     29   100 our %EXPORT_TAGS = (events => [qw(assignment success failure)]);
14 29         71 our @EXPORT_OK = map { @$_ } values %EXPORT_TAGS;
  29         571  
15             };
16              
17              
18             1;
19              
20             __END__