File Coverage

blib/lib/AnyEvent/Gearman/Constants.pm
Criterion Covered Total %
statement 13 13 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod n/a
total 17 17 100.0


line stmt bran cond sub pod time code
1             package AnyEvent::Gearman::Constants;
2 7     7   825 use strict;
  7         18  
  7         236  
3 7     7   39 use warnings;
  7         18  
  7         233  
4 7     7   40 use base 'Exporter';
  7         17  
  7         791  
5              
6             BEGIN {
7 7     7   291 my %constants = (
8             CAN_DO => 1,
9             CANT_DO => 2,
10             RESET_ABILITIES => 3,
11             PRE_SLEEP => 4,
12             NOOP => 6,
13             SUBMIT_JOB => 7,
14             JOB_CREATED => 8,
15             GRAB_JOB => 9,
16             NO_JOB => 10,
17             JOB_ASSIGN => 11,
18             WORK_STATUS => 12,
19             WORK_COMPLETE => 13,
20             WORK_FAIL => 14,
21             GET_STATUS => 15,
22             ECHO_REQ => 16,
23             ECHO_RES => 17,
24             SUBMIT_JOB_BG => 18,
25             ERROR => 19,
26             STATUS_RES => 20,
27             SUBMIT_JOB_HIGH => 21,
28             SET_CLIENT_ID => 22,
29             CAN_DO_TIMEOUT => 23,
30             ALL_YOURS => 24,
31             WORK_EXCEPTION => 25,
32             OPTION_REQ => 26,
33             OPTION_RES => 27,
34             WORK_DATA => 28,
35             WORK_WARNING => 29,
36             GRAB_JOB_UNIQ => 30,
37             JOB_ASSIGN_UNIQ => 31,
38             SUBMIT_JOB_HIGH_BG => 32,
39             SUBMIT_JOB_LOW => 33,
40             SUBMIT_JOB_LOW_BG => 34,
41             SUBMIT_JOB_SCHED => 35,
42             SUBMIT_JOB_EPOCH => 36,
43             );
44              
45 7         51 require constant;
46 7         2904 import constant \%constants;
47              
48 7         342 our @EXPORT = keys %constants;
49             };
50              
51             1;
52              
53             __END__