File Coverage

blib/lib/Config/PlConfig/Host/Local.pm
Criterion Covered Total %
statement 22 22 100.0
branch n/a
condition n/a
subroutine 8 8 100.0
pod 0 1 0.0
total 30 31 96.7


line stmt bran cond sub pod time code
1             # $Id$
2             # $Source$
3             # $Author$
4             # $HeadURL$
5             # $Revision$
6             # $Date$
7             package Config::PlConfig::Host::Local;
8 2     2   10 use warnings;
  2         3  
  2         68  
9 2     2   8 use strict;
  2         3  
  2         53  
10 2     2   31 use 5.006001;
  2         5  
  2         76  
11 2     2   10 use Carp;
  2         3  
  2         104  
12 2     2   7 use version; our $VERSION = qv('0.1_02');
  2         3  
  2         9  
13 2     2   141 use base 'Config::PlConfig::Host::Base';
  2         10  
  2         2395  
14             {
15 2     2   2063 use File::HomeDir;
  2         17907  
  2         273  
16              
17             sub locate_confdir_parent {
18 3     3 0 27 return File::HomeDir->my_data( );
19             }
20              
21             }
22              
23             # Module implementation here
24              
25              
26             1; # Magic true value required at end of module
27             __END__