This file is indexed.

/usr/bin/modulemaker is in libextutils-modulemaker-perl 0.54-1.

This file is owned by root:root, with mode 0o755.

The actual contents of the file can be viewed below.

  1
  2
  3
  4
  5
  6
  7
  8
  9
 10
 11
 12
 13
 14
 15
 16
 17
 18
 19
 20
 21
 22
 23
 24
 25
 26
 27
 28
 29
 30
 31
 32
 33
 34
 35
 36
 37
 38
 39
 40
 41
 42
 43
 44
 45
 46
 47
 48
 49
 50
 51
 52
 53
 54
 55
 56
 57
 58
 59
 60
 61
 62
 63
 64
 65
 66
 67
 68
 69
 70
 71
 72
 73
 74
 75
 76
 77
 78
 79
 80
 81
 82
 83
 84
 85
 86
 87
 88
 89
 90
 91
 92
 93
 94
 95
 96
 97
 98
 99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
#!/usr/bin/perl

eval 'exec /usr/bin/perl  -S $0 ${1+"$@"}'
    if 0; # not running under some shell
#$Id$
# modulemaker:  command-line utility implementing ExtUtils::ModuleMaker
eval 'exec /usr/local/bin/perl  -S $0 ${1+"$@"}'
  if 0;    # not running under some shell
use strict;
local $^W = 1;
use ExtUtils::ModuleMaker::Interactive;
use ExtUtils::ModuleMaker::Opts;
use vars qw ( $VERSION );
$VERSION = 0.51;

my $opt = ExtUtils::ModuleMaker::Opts->new(
    q{ExtUtils::ModuleMaker},
    q{modulemaker},
);

my $mod = ExtUtils::ModuleMaker::Interactive->new(
    $opt->get_standard_options()
);

$mod->run_interactive() if $mod->{INTERACTIVE};

$mod->complete_build();

$mod->closing_message();

################### DOCUMENTATION ################### 

=head1 NAME

modulemaker - interactive interface to ExtUtils::ModuleMaker; replaces C<h2xs -AXn [module]>

=head1 VERSION

This document references version 0.51 of modulemaker, released
to CPAN on February 9, 2008.

=head1 USAGE::Simple

=head2 Easy

At the command-prompt, simply call:

    % modulemaker

... and answer each question.

=head2 Not So Easy, But More Geeky

At the command-prompt, call C<modulemaker> with as many options as you can type correctly:

    modulemaker [-CIPVchqs] [-v version] [-n module_name] [-a abstract]
        [-u author_name] [-p author_CPAN_ID] [-o organization]
        [-w author_website] [-e author_e-mail]
        [-l license_name] [-b build_system]

=head2 Mix and Match

You can specify some of the arguments on the command-line and then -- assuming
you don't include the C<-I> option -- F<modulemaker> will then switch to
interactive mode so that you can finish entering arguments at the prompts.

=head1 USAGE::More

=head2 Menus

After calling C<modulemaker> at the command-prompt, you will be presented with 
a series of menus looking something like this:

=head3 Main Menu

  ------------------------

  modulemaker: Main Menu

      Feature                     Current Value
  N - Name of module              ''
  S - Abstract                    'Module abstract (<= 44 characters) goes here'
  A - Author information
  L - License                     'perl'
  D - Directives
  B - Build system                'ExtUtils::MakeMaker'

  G - Generate module
  H - Generate module;
      save selections as defaults

  X - Exit immediately

  Please choose which feature you would like to edit: 

In many cases you make your selection by typing a single letter or number and
hitting the C<Return> key.  In the remaining cases, you have to type what you
want.

Note that in the Main Menu:

=over 4

=item * G

C<G> generates the directories and files requested, then exits.

=item * H

C<H> generates the directories and files requested, saves the values you have
entered (with the exception of the module's name and abstract) in a personal
defaults file, then exits.  (See the documentation for ExtUtils::ModuleMaker
for a more complete discussion of this feature.)

=item * X

C<X> exits without generating directories or file.

=back

=head3 Author Menu

  ------------------------

  modulemaker: Author Menu

      Feature       Current Value
  N - Author        'A. U. Thor'
  C - CPAN ID       'MODAUTHOR'
  O - Organization  'XYZ Corp.'
  W - Website       'http://a.galaxy.far.far.away/modules'
  E - Email         'a.u.thor@a.galaxy.far.far.away'

  R - Return to main menu
  X - Exit immediately

  Please choose which feature you would like to edit:

The values you enter here to override the Current Values may be good choices
for the C<H> 'save selections as defaults' feature in the Main Menu.

Note that you cannot generate directories or files from this menu.  You must
return (C<R>) to the Main Menu first.  You can, however, bail out of the
program from this menu with C<X>.

=head3 License Menu

  ------------------------

  modulemaker: License Menu

  ModuleMaker provides many licenes to choose from, many of them approved by
  opensource.org.

          License Name
  1       Apache Software License (1.1)
  2       Artistic License
  3       Artistic License w/ Aggregation
  4       BSD License
  5       BSD License(Raw)
  6       CVW - MITRE Collaborative Virtual Workspace
  7       GPL - General Public License (2)
  8       IBM Public License Version (1.0)
  9       Intel (BSD+)
  10      Jabber (1.0)
  11      LGPL - GNU Lesser General Public License (2.1)
  12      MIT License
  13      Mozilla Public License (1.0)
  14      Mozilla Public License (1.1)
  15      Nethack General Public License
  16      Nokia Open Source License(1.0a)
  17      Python License
  18      Q Public License (1.0)
  19      Ricoh Source Code Public License (1.0)
  20***   Same terms as Perl itself
  21      Sun Internet Standards Source License
  22      The Sleepycat License
  23      Vovida Software License (1.0)
  24      zlib/libpng License
  25      Loose Lips License (1.0)

  # - Enter the number of the license you want to use
  C - Display the Copyright
  L - Display the License
  R - Return to main menu
  X - Exit immediately

  Please choose which license you would like to use:

=head3 Directives Menu

  ------------------------
 
  modulemaker: Directives Menu
 
      Feature           Current Value
  C - Compact          '0'
  V - Verbose          '0'
  D - Include POD      '1'
  N - Include new      '1'
  H - History in POD   '0'
  P - Permissions      '0755 - 493'
 
  R - Return to main menu
  X - Exit immediately
 
  Please choose which feature you would like to edit:

As with the Author Menu above, the values you enter here to override the 
Current Values may be good choices for the C<H> 'save selections as 
defaults' feature in the Main Menu.

=head3 Build System Menu

  ------------------------

  Here is the current build system:

  ExtUtils::MakeMaker

  E - ExtUtils::MakeMaker
  B - Module::Build
  P - Module::Build and proxy Makefile.PL
  R - Return to main menu
  X - Exit immediately

  Please choose which build system you would like to use:

=head2 Features Currently Supported with Command-Line Options

=over 4

=item * -a

Specify (in quotes) an abstract for this extension

=item * -b

Specify a build system for this extension

=item * -c

Flag for compact base directory name

=item * -C

Omit creating the Changes file, add HISTORY heading to stub POD

=item * -d

Name of Perl module whose methods will override defaults provided in
F<ExtUtils/ModuleMaker.pm> and F<ExtUtils/ModuleMaker/StandardText.pm>.

=item * -e

Specify author's e-mail address

=item * -h

Display this help message

=item * -I

Disable INTERACTIVE mode, the command line arguments better be complete

=item * -l

Specify a license for this extension

=item * -n

Specify a name to use for the extension (required)

=item * -o

Specify (in quotes) author's organization

=item * -p

Specify author's CPAN ID

=item * -P

Omit the stub POD section

=item * -q

Do not include a constructor (C<new()>) in the F<*.pm> file.

=item * -r

Set permissions.

=item * -s

Save the selections entered (either as command-line options or as responses to
F<modulemaker>'s prompts) as your new personal defaults.  These will be the
values provided by ExtUtils::ModuleMaker or F<modulemaker> the next time you
invoke either one of them.

=item * -u

Specify (in quotes) author's name

=item * -v

Specify a version number for this extension

=item * -V

Flag for verbose messages during module creation

=item * -w

Specify author's web site

=back

The code handling the processing of these options is found in
package ExtUtils::ModuleMaker::Opts.

=head1 AUTHOR

ExtUtils::ModuleMaker was originally written in 2001-02 by R. Geoffrey Avery
(modulemaker [at] PlatypiVentures [dot] com).  Since version 0.33 (July
2005) it has been maintained by James E. Keenan (jkeenan [at] cpan [dot]
org).

=head1 COPYRIGHT

Copyright (c) 2001-2002 R. Geoffrey Avery.
Revisions from v0.33 forward (c) 2005 James E. Keenan.  All rights reserved.
This program is free software; you can redistribute
it and/or modify it under the same terms as Perl itself.

The full text of the license can be found in the
LICENSE file included with this module.

=head1 SEE ALSO

F<ExtUtils::ModuleMaker>, F<ExtUtils::ModuleMaker::StandardText>, F<perlnewmod>, 
F<h2xs>.

=cut