Permalink
Switch branches/tags
libwww-perl/6.03 libwww-perl/6.02 libwww-perl/6.01 libwww-perl/6.00 libwww-perl/5.837 libwww-perl/5.836 libwww-perl/5.835 libwww-perl/5.834 libwww-perl/5.833 libwww-perl/5.832 libwww-perl/5.831 libwww-perl/5.830 libwww-perl/5.829 libwww-perl/5.828 libwww-perl/5.827 libwww-perl/5.826 libwww-perl/5.825 libwww-perl/5.824 libwww-perl/5.823 libwww-perl/5.822 libwww-perl/5.821 libwww-perl/5.820 libwww-perl/5.819 libwww-perl/5.818 libwww-perl/5.817 libwww-perl/5.816 libwww-perl/5.815 libwww-perl/5.814 libwww-perl/5.813 libwww-perl/5.812 libwww-perl/5.811 libwww-perl/5.810 libwww-perl/5.808 libwww-perl/5.807 libwww-perl/5.806 libwww-perl/5.805 libwww-perl/5.804 libwww-perl/5.803 libwww-perl/5.802 libwww-perl/5.801 libwww-perl/5.800 libwww-perl/5.79 libwww-perl/5.78 libwww-perl/5.77 libwww-perl/5.76 libwww-perl/5.75 libwww-perl/5.74 libwww-perl/5.73 libwww-perl/5.72 libwww-perl/5.71 libwww-perl/5.70 libwww-perl/5.69 libwww-perl/5.68 libwww-perl/5.67 libwww-perl/5.66 libwww-perl/5.65 libwww-perl/5.64 libwww-perl/5.63 libwww-perl/5.62 libwww-perl/5.61 libwww-perl/5.60 libwww-perl/5.53.97 libwww-perl/5.53.96 libwww-perl/5.53.95 libwww-perl/5.53.94 libwww-perl/5.53.93 libwww-perl/5.53.92 libwww-perl/5.53.91 libwww-perl/5.53.90 libwww-perl/5.53 libwww-perl/5.52 libwww-perl/5.51 libwww-perl/5.50 libwww-perl/5.49 libwww-perl/5.48 libwww-perl/5.47 libwww-perl/5.46 libwww-perl/5.45 libwww-perl/5.44 libwww-perl/5.43 libwww-perl/5.42 libwww-perl/5.41 libwww-perl/5.40.01 libwww-perl/5.36 libwww-perl/5.35 libwww-perl/5.34 libwww-perl/5.33 libwww-perl/5.32 libwww-perl/5.31 libwww-perl/5.30 libwww-perl/5.22 libwww-perl/5.21 libwww-perl/5.20 libwww-perl/5.19 libwww-perl/5.18.05 libwww-perl/5.18.04 libwww-perl/5.18.03 libwww-perl/5.18 libwww-perl/5.17 libwww-perl/5.16
Nothing to show
Find file Copy path
Fetching contributors…
Cannot retrieve contributors at this time
131 lines (115 sloc) 3.14 KB
#!perl -w
require 5.008001;
use strict;
use ExtUtils::MakeMaker;
use Getopt::Long qw(GetOptions);
GetOptions(\my %opt,
'aliases',
'no-programs|n',
'live-tests',
'jigsaw-tests',
) or do {
die "Usage: $0 [--aliases] [--no-programs] [--live-tests] [--jigsaw-tests]\n";
};
my @prog;
push(@prog, qw(lwp-request lwp-mirror lwp-download lwp-dump))
unless $opt{'no-programs'} || grep /^LIB=/, @ARGV;
if ($opt{'aliases'} && grep(/lwp-request/, @prog)) {
require File::Copy;
for (qw(GET HEAD POST)) {
File::Copy::copy("bin/lwp-request", "bin/$_") || die "Can't copy bin/$_";
chmod(0755, "bin/$_");
push(@prog, $_);
}
}
system($^X, "talk-to-ourself");
flag_file("t/CAN_TALK_TO_OURSELF", $? == 0);
flag_file("t/live/ENABLED", $opt{'live-tests'});
flag_file("t/live/jigsaw/ENABLED", $opt{'jigsaw-tests'});
WriteMakefile(
NAME => 'LWP',
DISTNAME => 'libwww-perl',
VERSION_FROM => 'lib/LWP.pm',
ABSTRACT => 'The World-Wide Web library for Perl',
AUTHOR => 'Gisle Aas <gisle@activestate.com>',
EXE_FILES => [ map "bin/$_", @prog ],
LICENSE => "perl",
MIN_PERL_VERSION => 5.008001,
PREREQ_PM => {
'Digest::MD5' => 0,
'Encode' => "2.12",
'Encode::Locale' => 0,
'File::Listing' => 6,
'HTML::Entities' => 0,
'HTML::HeadParser' => 0,
'HTTP::Cookies' => 6,
'HTTP::Daemon' => 6,
'HTTP::Date' => 6,
'HTTP::Negotiate' => 6,
'HTTP::Request' => 6,
'HTTP::Request::Common' => 6,
'HTTP::Response' => 6,
'HTTP::Status' => 6,
'IO::Select' => 0,
'IO::Socket' => 0,
'LWP::MediaTypes' => 6,
'MIME::Base64' => "2.1",
'Net::FTP' => "2.58",
'Net::HTTP' => "6.04",
'URI' => "1.10",
'URI::Escape' => 0,
'WWW::RobotRules' => 6,
},
META_MERGE => {
recommends => {
'LWP::Protocol::https' => '6.02',
'Authen::NTLM' => "1.02",
'Data::Dump' => 0,
},
resources => {
repository => 'https://github.com/libwww-perl/libwww-perl',
MailingList => 'mailto:libwww@perl.org',
}
},
clean => { FILES => join(" ", map "bin/$_", grep /^[A-Z]+$/, @prog) },
);
sub MY::test
{
q(
TEST_VERBOSE=0
test : pure_all
$(FULLPERL) t/TEST $(TEST_VERBOSE)
test_hudson : pure_all
$(FULLPERL) t/TEST $(TEST_VERBOSE) --formatter=TAP::Formatter::JUnit
);
}
sub flag_file {
my($file, $create) = @_;
if ($create) {
open(my $fh, ">", $file) || die "Can't create $file: $!";
}
else {
unlink($file);
}
}
BEGIN {
# compatibility with older versions of MakeMaker
my $developer = -f ".gitignore";
my %mm_req = (
LICENCE => 6.31,
META_MERGE => 6.45,
META_ADD => 6.45,
MIN_PERL_VERSION => 6.48,
);
undef(*WriteMakefile);
*WriteMakefile = sub {
my %arg = @_;
for (keys %mm_req) {
unless (eval { ExtUtils::MakeMaker->VERSION($mm_req{$_}) }) {
warn "$_ $@" if $developer;
delete $arg{$_};
}
}
ExtUtils::MakeMaker::WriteMakefile(%arg);
};
}