3 if [[ -n "$SHORT_CIRCUIT_SMOKE" ]] ; then return ; fi
5 # we need a mirror that both has the standard index and a backpan version rolled
6 # into one, due to MDV testing
7 CPAN_MIRROR="http://cpan.metacpan.org/"
9 PERL_CPANM_OPT="$PERL_CPANM_OPT --mirror $CPAN_MIRROR"
11 # do not set PERLBREW_CPAN_MIRROR - not all backpan-like mirrors have the perl tarballs
12 export PERL_MM_USE_DEFAULT=1 PERL_MM_NONINTERACTIVE=1 PERL_AUTOINSTALL_PREFER_CPAN=1 HARNESS_TIMER=1 MAKEFLAGS="-j$NUMTHREADS"
14 # try CPAN's latest offering if requested
15 if [[ "$DEVREL_DEPS" == "true" ]] ; then
17 PERL_CPANM_OPT="$PERL_CPANM_OPT --dev"
21 # Fixup CPANM_OPT to behave more like a traditional cpan client
22 export PERL_CPANM_OPT="--verbose --no-interactive --no-man-pages $( echo $PERL_CPANM_OPT | sed 's/--skip-satisfied//' )"
24 if [[ -n "$BREWVER" ]] ; then
25 # since perl 5.14 a perl can safely be built concurrently with -j$large
26 # (according to brute force testing and my power bill)
27 if [[ "$BREWVER" == "blead" ]] || perl -Mversion -e "exit !!(version->new(q($BREWVER)) < 5.014)" ; then
28 perlbrew_jopt="$NUMTHREADS"
31 run_or_err "Compiling/installing Perl $BREWVER (without testing, using ${perlbrew_jopt:-1} threads, may take up to 5 minutes)" \
32 "perlbrew install --as $BREWVER --notest --noman --verbose $BREWOPTS -j${perlbrew_jopt:-1} $BREWVER"
34 # can not do 'perlbrew uss' in the run_or_err subshell above, or a $()
35 # furthermore `perlbrew use` returns 0 regardless of whether the perl is
36 # found (won't be there unless compilation suceeded, wich *ALSO* returns 0)
39 if [[ "$( perlbrew use | grep -oP '(?<=Currently using ).+' )" != "$BREWVER" ]] ; then
40 echo_err "Unable to switch to $BREWVER - compilation failed...?"
45 # no brewver - this means a travis perl, which means we want to clean up
46 # the presently installed libs
47 elif [[ "$CLEANTEST" == "true" ]] && [[ "$POISON_ENV" != "true" ]] ; then
51 # configure CPAN.pm - older versions go into an endless loop
52 # when trying to autoconf themselves
55 require CPAN::FirstTime;
56 *CPAN::FirstTime::conf_sites = sub {};
58 \$CPAN::Config->{urllist} = [qw{ $CPAN_MIRROR }];
59 \$CPAN::Config->{halt_on_failure} = 1;
62 run_or_err "Configuring CPAN.pm" "perl -e '$CPAN_CFG_SCRIPT'"
64 # poison the environment
65 if [[ "$POISON_ENV" = "true" ]] ; then
67 # look through lib, find all mentioned DBIC* ENVvars and set them to true and see if anything explodes
68 toggle_booleans=( $(grep -P '\$ENV\{' -r lib/ --exclude-dir Optional | grep -oP '\bDBIC\w+' | sort -u | grep -vP '^(DBIC_TRACE(_PROFILE)?|DBIC_.+_DEBUG)$') )
70 # some extra pollutants
72 DBICTEST_SQLITE_USE_FILE \
73 DBICTEST_RUN_ALL_TESTS \
74 DBICTEST_SQLITE_REVERSE_DEFAULT_ORDER \
77 # if we have Moose - try to run everything under replicated
78 # FIXME - when switching to Moo kill this
79 if [[ "$CLEANTEST" != "true" ]] && perl -M5.008003 -e 1 &>/dev/null ; then
80 toggle_booleans+=( DBICTEST_VIA_REPLICATED )
83 # some people do in fact set this - boggle!!!
84 # it of course won't work before 5.8.4
85 if perl -M5.008004 -e 1 &>/dev/null ; then
86 toggle_booleans+=( PERL_STRICTURES_EXTRA )
89 for var in "${toggle_booleans[@]}"
91 if [[ -z "${!var}" ]] ; then
93 echo "POISON_ENV: setting $var to 1"
97 # bogus nonexisting DBI_*
98 export DBI_DSN="dbi:ODBC:server=NonexistentServerAddress"
99 export DBI_DRIVER="ADO"
101 # emulate a local::lib-like env
102 # trick cpanm into executing true as shell - we just need the find+unpack
103 run_or_err "Downloading latest stable DBIC from CPAN" \
104 "SHELL=/bin/true cpanm --look DBIx::Class"
106 export PERL5LIB="$( ls -d ~/.cpanm/latest-build/DBIx-Class-*/lib | tail -n1 ):$PERL5LIB"
108 # perldoc -l <mod> searches $(pwd)/lib in addition to PERL5LIB etc, hence the cd /
109 echo_err "Latest stable DBIC (without deps) locatable via \$PERL5LIB at $(cd / && perldoc -l DBIx::Class)"
113 if [[ "$CLEANTEST" != "true" ]] ; then
114 # using SQLT if will be available
115 # not doing later because we will be running in a subshell
116 export DBICTEST_SQLT_DEPLOY=1