tstamp() { echo -n "[$(date '+%H:%M:%S')]" ; }
+CPAN_is_sane() { perl -MCPAN\ 1.94_56 -e 1 &>/dev/null ; }
+
+CPAN_supports_BUILDPL() { perl -MCPAN\ 1.9205 -e1 &>/dev/null; }
+
+have_sudo() { sudo /bin/true &>/dev/null ; }
+
+is_cperl() { [[ "$BREWVER" =~ $( echo -n "^cperl-" ) ]] ; }
+
ci_vm_state_text() {
echo "
========================== CI System information ============================
echo_err "$LASTCMD"
echo_err "STDOUT+STDERR:"
echo_err "$LASTOUT"
+ if [[ "$(dmesg)" =~ $( echo "\\bOOM\\b" ) ]] ; then
+ echo_err "=== dmesg ringbuffer"
+ echo_err "$(dmesg)"
+ fi
fi
return $LASTEXIT
# flatten
pkgs="$@"
- run_or_err "Installing Debian APT packages: $pkgs" "sudo apt-get install --allow-unauthenticated --no-install-recommends -y $pkgs"
+ run_or_err "Installing APT packages: $pkgs" "sudo apt-get install --allow-unauthenticated --no-install-recommends -y $pkgs"
}
extract_prereqs() {
parallel_installdeps_notest() {
if [[ -z "$@" ]] ; then return; fi
+ is_cperl && echo_err "cpanminus is not yet usable on cperl" && exit 1
+
# one module spec per line
MODLIST="$(printf '%s\n' "$@" | sort -R)"
"
}
-export -f parallel_installdeps_notest run_or_err echo_err tstamp
+export -f parallel_installdeps_notest run_or_err echo_err tstamp is_cperl have_sudo CPAN_is_sane CPAN_supports_BUILDPL
installdeps() {
if [[ -z "$@" ]] ; then return; fi
_dep_inst_with_test() {
if [[ "$DEVREL_DEPS" == "true" ]] ; then
+ is_cperl && echo_err "cpanminus is not yet usable on cperl" && exit 1
+
# --dev is already part of CPANM_OPT
LASTCMD="$TIMEOUT_CMD cpanm $@"
$LASTCMD 2>&1 || return 1
fi
}
-
-
-CPAN_is_sane() { perl -MCPAN\ 1.94_56 -e 1 &>/dev/null ; }
-
-CPAN_supports_BUILDPL() { perl -MCPAN\ 1.9205 -e1 &>/dev/null; }
-
-have_sudo() { sudo /bin/true &>/dev/null ; }