File Coverage

blib/lib/Apache/Voodoo/MP.pm
Criterion Covered Total %
statement 6 12 50.0
branch 0 2 0.0
condition 0 3 0.0
subroutine 2 3 66.6
pod 0 1 0.0
total 8 21 38.1


line stmt bran cond sub pod time code
1             ################################################################################
2             #
3             # Factory that creates either a MP1 or MP2 object depending on whether or not
4             # we're running under mod_perl 1 or 2. This saves us from having to write, and
5             # clutter up the code with, a load of conditionals in the Handler.
6             #
7             ################################################################################
8             package Apache::Voodoo::MP;
9              
10             $VERSION = "3.0200";
11              
12 1     1   5 use strict;
  1         2  
  1         31  
13 1     1   6 use warnings;
  1         2  
  1         128  
14              
15             sub new {
16 0     0 0   my $class = shift;
17              
18 0 0 0       if (exists $ENV{MOD_PERL_API_VERSION} and $ENV{MOD_PERL_API_VERSION} >= 2 ) {
19 0           require Apache::Voodoo::MP::V2;
20 0           return Apache::Voodoo::MP::V2->new();
21             }
22             else {
23 0           require Apache::Voodoo::MP::V1;
24 0           return Apache::Voodoo::MP::V1->new();
25             }
26             }
27              
28             1;
29              
30             ################################################################################
31             # Copyright (c) 2005-2010 Steven Edwards (maverick@smurfbane.org).
32             # All rights reserved.
33             #
34             # You may use and distribute Apache::Voodoo under the terms described in the
35             # LICENSE file include in this package. The summary is it's a legalese version
36             # of the Artistic License :)
37             #
38             ################################################################################