Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Fetching contributors…

Cannot retrieve contributors at this time

executable file 82 lines (70 sloc) 3.111 kb
#!/usr/bin/perl -w
# This is a Module::Build script for BioPerl-Run installation.
# See http://search.cpan.org/~kwilliams/Module-Build/lib/Module/Build.pm
use strict;
use warnings;
use Module::Build;
my $build = Module::Build->new(
module_name => 'Bio::Run',
dist_name => 'BioPerl-Run',
dist_version => '1.006900',
dist_author => 'BioPerl Team <bioperl-l@bioperl.org>',
dist_abstract => 'BioPerl-Run - wrapper toolkit',
license => 'perl',
requires => {
'perl' => '5.6.1',
'Bio::Root::Version' => '1.006900'
},
recommends => {
'Algorithm::Diff' => 0, # generating consensus protein family descriptions: Bio::Tools::Run::TribeMCL
'IPC::Run' => 0, # Glimmer and Genemark application wrappers: Bio::Tools::Run::Glimmer Bio::Tools::Run::Genemark
'IO::String' => 0, # generating Bio::Tree::Tree from strings: Bio::Tools::Run::Phylo::Phylip::Consense
'XML::Twig' => 0 # processing XML data: Bio::Tools::Run::EMBOSSacd
},
get_options => {
accept => { },
network => { }
},
auto_features => {
Network => {
description => "Enable tests that need an internet connection",
requires => { 'LWP::UserAgent' => 0 }
}
},
dynamic_config => 1,
create_makefile_pl => 'passthrough'
);
my $accept = $build->args->{accept};
# Optionally have script files installed.
if ($accept ? 0 : $build->y_n("Install scripts? y/n", 'n')) {
my $files = $build->_find_file_by_type('PLS', 'scripts');
my $script_build = File::Spec->catdir($build->blib, 'script');
my @tobp;
while (my ($file, $dest) = each %$files) {
$dest = 'bp_'.File::Basename::basename($dest);
$dest =~ s/PLS$/pl/;
$dest = File::Spec->catfile($script_build, $dest);
$build->copy_if_modified(from => $file, to => $dest);
push @tobp, $dest;
}
$build->script_files(\@tobp);
}
# Do network tests?
my $do_network_tests = 0;
if ($build->args('network')) {
$do_network_tests = $build->feature('Network');
}
elsif ($build->feature('Network')) {
$do_network_tests = $accept ? 0 : $build->y_n("Do you want to run tests that require connection to servers across the internet\n(likely to cause some failures)? y/n", 'n');
}
if ($do_network_tests) {
$build->notes(network => 1);
$build->log_info(" - will run internet-requiring tests\n");
}
else {
$build->notes(network => 0);
$build->log_info(" - will not run internet-requiring tests\n");
}
# Create the build script and exit
$build->create_build_script;
exit;
Jump to Line
Something went wrong with that request. Please try again.