File Coverage

blib/lib/ExtUtils/ModuleMaker/Defaults.pm
Criterion Covered Total %
statement 8 8 100.0
branch n/a
condition n/a
subroutine 3 3 100.0
pod 1 1 100.0
total 12 12 100.0


line stmt bran cond sub pod time code
1             package ExtUtils::ModuleMaker::Defaults;
2 86     86   364 use strict;
  86         79  
  86         2056  
3 86     86   239 use vars qw( $VERSION );
  86         82  
  86         10832  
4             $VERSION = 0.56;
5              
6             my $usage = <
7              
8             There were problems with your data supplied to ExtUtils::ModuleMaker.
9             Please fix the problems listed above and try again.
10              
11             ENDOFUSAGE
12              
13             my %default_values = (
14             LICENSE => 'perl',
15             VERSION => '0.01',
16             ABSTRACT => 'Module abstract (<= 44 characters) goes here',
17             AUTHOR => 'A. U. Thor',
18             CPANID => 'MODAUTHOR',
19             ORGANIZATION => 'XYZ Corp.',
20             WEBSITE => 'http://a.galaxy.far.far.away/modules',
21             EMAIL => 'a.u.thor@a.galaxy.far.far.away',
22             BUILD_SYSTEM => 'ExtUtils::MakeMaker',
23             COMPACT => 0,
24             VERBOSE => 0,
25             INTERACTIVE => 0,
26             NEED_POD => 1,
27             NEED_NEW_METHOD => 1,
28             CHANGES_IN_POD => 0,
29             PERMISSIONS => 0755,
30             SAVE_AS_DEFAULTS => 0,
31             USAGE_MESSAGE => $usage,
32             FIRST_TEST_NUMBER => 1,
33             TEST_NUMBER_FORMAT => "%03d",
34             TEST_NAME => 'load',
35             EXTRA_MODULES_SINGLE_TEST_FILE => 0,
36             TEST_NAME_DERIVED_FROM_MODULE_NAME => 0,
37             TEST_NAME_SEPARATOR => q{_},
38             INCLUDE_MANIFEST_SKIP => 0,
39             INCLUDE_TODO => 1,
40             INCLUDE_POD_COVERAGE_TEST => 0,
41             INCLUDE_POD_TEST => 0,
42             INCLUDE_LICENSE => 1,
43             INCLUDE_SCRIPTS_DIRECTORY => 1,
44             INCLUDE_FILE_IN_PM => 0,
45             INCLUDE_ID_LINE => 0,
46             INCLUDE_WARNINGS => 0,
47             );
48              
49             sub default_values {
50 89     89 1 162 my $self = shift;
51 89         2170 return { %default_values };
52             }
53              
54             1;
55              
56             #################### DOCUMENTATION ####################
57              
58             =head1 NAME
59              
60             ExtUtils::ModuleMaker::Defaults - Default values for ExtUtils::ModuleMaker objects
61              
62             =head1 METHODS
63              
64             =head3 C
65              
66             Usage : $self->default_values() within new(); within
67             ExtUtils::ModuleMaker::Interactive::_prepare_author_defaults()
68             and _prepare_directives_defaults();
69             within t/testlib/Testing/Defaults.pm
70             Purpose : Set the default values for ExtUtils::ModuleMaker object elements
71             Returns : Reference to a hash of default values
72             Argument : n/a
73             Comment : Can be overridden by establishing a Personal::Defaults file.
74             Comment : See ExtUtils::ModuleMaker::PBP for an example of subclassing
75             this method.
76              
77             =head1 SEE ALSO
78              
79             F.
80              
81             =cut
82