File: Build.PL

package info (click to toggle)
libgetopt-euclid-perl 0.4.5-2
  • links: PTS, VCS
  • area: main
  • in suites: bullseye, buster, sid, stretch
  • size: 692 kB
  • ctags: 188
  • sloc: perl: 2,410; makefile: 2
file content (48 lines) | stat: -rw-r--r-- 1,189 bytes parent folder | download | duplicates (3)
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
use strict;
use warnings;
use Module::Build;

# If you updated this file, don't forget to update the Makefile.PL file as well!

my $builder = Module::Build->new(
    module_name         => 'Getopt::Euclid',
    dist_author         => 'Damian Conway <DCONWAY@cpan.org>',
    license             => 'perl',
    dist_version_from   => 'lib/Getopt/Euclid.pm',

    build_requires      => {
        'Test::More'            => 0,
        'Pod::Checker'          => 0,
    },

    requires            => {
        'version'               => 0,
        'Pod::Select'           => 0,
        'Pod::PlainText'        => 0,
        'File::Basename'        => 0,
        'File::Spec::Functions' => 0,
        'List::Util'            => 0,
        'Text::Balanced'        => 0,
    },

    recommends          => {
        'IO::Pager::Page'       => 0,
    },

    add_to_cleanup      => [ 'Getopt-Euclid-*' ],
);

$builder->create_build_script();

if ( -e 'MANIFEST.SKIP' ) {
   generate_readme( 'lib/Getopt/Euclid.pm', 'README' ); 
}



sub generate_readme {
   my ($in, $out) = @_;
   `pod2text $in $out`;
   warn "Warning: Could not generate $out.\n$!\n" if $? == -1;
   return $?; # exit status
}