File Coverage

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


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