1 |
unless ( eval "use Module::Build::Compat 0.02; 1" ) { |
use inc::Module::Install; |
|
print "This module requires Module::Build to install itself.\n"; |
|
2 |
|
|
3 |
require ExtUtils::MakeMaker; |
name('Webpacus'); |
4 |
my $yn = |
abstract('AJAX front-end for WebPAC'); |
5 |
ExtUtils::MakeMaker::prompt( ' Install Module::Build now from CPAN?', 'y' ); |
author('Dobrica Pavlinusic C<< <dpavlin@rot13.org >>'); |
6 |
|
version_from('lib/Webpacus.pm'); |
7 |
unless ( $yn =~ /^y/i ) { |
license('perl'); |
8 |
die " *** Cannot install without Module::Build. Exiting ...\n"; |
|
9 |
} |
include('ExtUtils::AutoInstall'); |
10 |
|
|
11 |
require Cwd; |
requires( 'Catalyst' => '5.60' ); |
12 |
require File::Spec; |
requires( 'Catalyst::Plugin::SubRequest' ); |
13 |
require CPAN; |
requires( 'Catalyst::Plugin::Config::YAML' ); |
14 |
|
requires( 'Catalyst::Plugin::Prototype' ); |
15 |
# Save this 'cause CPAN will chdir all over the place. |
requires( 'HTML::Tidy' ); |
16 |
my $cwd = Cwd::cwd(); |
requires( 'HTML::Prototype' ); |
17 |
my $makefile = File::Spec->rel2abs($0); |
requires( 'File::Slurp' ); |
18 |
|
requires( 'Data::Dumper' ); |
19 |
CPAN::Shell->install('Module::Build::Compat') |
requires( 'Time::HiRes' ); |
20 |
or die " *** Cannot install without Module::Build. Exiting ...\n"; |
|
21 |
|
catalyst_files(); |
22 |
chdir $cwd or die "Cannot chdir() back to $cwd: $!"; |
|
23 |
} |
install_script( glob('script/*.pl') ); |
24 |
eval "use Module::Build::Compat 0.02; 1" or die $@; |
auto_install(); |
25 |
use lib '_build/lib'; |
&WriteAll; |
|
Module::Build::Compat->run_build_pl( args => \@ARGV ); |
|
|
require Module::Build; |
|
|
Module::Build::Compat->write_makefile( build_class => 'Module::Build' ); |
|