File Coverage

blib/lib/AnyEvent/Gearman.pm
Criterion Covered Total %
statement 17 17 100.0
branch n/a
condition n/a
subroutine 7 7 100.0
pod 2 2 100.0
total 26 26 100.0


line stmt bran cond sub pod time code
1             package AnyEvent::Gearman;
2 2     2   617 use strict;
  2         3  
  2         84  
3 2     2   12 use warnings;
  2         4  
  2         67  
4 2     2   11 use base 'Exporter';
  2         4  
  2         270  
5              
6             our $VERSION = '0.10';
7              
8             our @EXPORT = qw/gearman_client gearman_worker/;
9              
10 2     2   1026 use AnyEvent::Gearman::Client;
  2         82  
  2         58  
11 2     2   653 use AnyEvent::Gearman::Worker;
  2         118  
  2         223  
12              
13             sub gearman_client {
14 1     1 1 37 AnyEvent::Gearman::Client->new(
15             job_servers => [@_],
16             );
17             }
18              
19             sub gearman_worker {
20 1     1 1 40 AnyEvent::Gearman::Worker->new(
21             job_servers => [@_],
22             );
23             }
24              
25             1;
26              
27             __END__