U/perl/Extras.U

   1 ?RCS: $Id: Extras.U,v$
   2 ?RCS:
   3 ?RCS: Copyright (c) 2001, Jarkko Hietaniemi
   4 ?RCS:
   5 ?RCS: You may distribute under the terms of either the GNU General Public
   6 ?RCS: License or the Artistic License, as specified in the README file.
   7 ?RCS:
   8 ?MAKE:extras: Myread Oldconfig Setvar rm
   9 ?MAKE:  -pick add $@ %<
  10 ?Y:TOP
  11 ?S:extras:
  12 ?S:     This variable holds a list of extra modules to install.
  13 ?S:.
  14 : See if we want extra modules installed
  15 echo " "
  16 case "$extras" in
  17 '') dflt='n';;
  18 *) dflt='y';;
  19 esac
  20 cat <<EOM
  21 Perl can be built with extra modules or bundles of modules which
  22 will be fetched from the CPAN and installed alongside Perl.
  23
  24 Notice that you will need access to the CPAN; either via the Internet,
  25 or a local copy, for example a CD-ROM or a local CPAN mirror.  (You will
  26 be asked later to configure the CPAN.pm module which will in turn do
  27 the installation of the rest of the extra modules or bundles.)
  28
  29 Notice also that if the modules require any external software such as
  30 libraries and headers (the libz library and the zlib.h header for the
  31 Compress::Zlib module, for example) you MUST have any such software
  32 already installed, this configuration process will NOT install such
  33 things for you.
  34
  35 If this doesn't make any sense to you, just accept the default '$dflt'.
  36 EOM
  37 rp='Install any extra modules (y or n)?'
  38 . ./myread
  39 case "$ans" in
  40 y|Y)
  41         cat <<EOM
  42
  43 Please list any extra modules or bundles to be installed from CPAN,
  44 with spaces between the names.  The names can be in any format the
  45 'install' command of CPAN.pm will understand.  (Answer 'none',
  46 without the quotes, to install no extra modules or bundles.)
  47 EOM
  48         rp='Extras?'
  49         dflt="$extras"
  50         . ./myread
  51         extras="$ans"
  52 esac
  53 case "$extras" in
  54 ''|'none')
  55         val=''
  56         $rm -f ../extras.lst
  57         ;;
  58 *)      echo "(Saving the list of extras for later...)"
  59         echo "$extras" > ../extras.lst
  60         val="'$extras'"
  61         ;;
  62 esac
  63 set extras
  64 eval $setvar
  65 echo " "
  66