Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- #!/bin/bash
- PERL=`which perl`
- INSTALLDIR=$1
- shift
- if [ $INSTALLDIR == "-h" ]; then
- echo "Usage: $0 [-h] <directory> <module> [<module> [<module>]]"
- echo
- exit
- fi
- if [ "$INSTALLDIR" == "" ]; then
- echo "Missing <directory>"
- exit
- fi
- if [[ ! "$INSTALLDIR" =~ ^\/ ]]; then
- INSTALLDIR=`pwd`"/$INSTALLDIR"
- fi
- MODULENAME="$@"
- if [ -z $MODULENAME ]; then
- echo "Missing <module> [<module> [<module>]]"
- exit
- fi
- echo "Install $MODULENAME into $INSTALLDIR"
- export PERL5LIB=$INSTALLDIR/lib/perl5
- export PERL_MM_OPT="INSTALL_BASE=$INSTALLDIR"
- export PERL_MB_OPT="--install_base=$INSTALLDIR"
- export PERL_LOCAL_LIB_ROOT=$INSTALLDIR
- export PATH=$INSTALLDIR/bin:$PATH
- # run install
- for module in $( echo "$MODULENAME" ); do
- if [ ! -z $FORCE_INSTALL ]; then
- $PERL -MCPAN -e 'CPAN::Shell->force( qw/ notest install /, "'$module'");'
- else
- $PERL -MCPAN -e 'CPAN::install( "'$module'" );'
- fi
- if [ $? -gt 0 ]; then
- echo
- echo "**** Error in $module *****"
- echo
- exit 1
- fi
- done
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement