Commit | Line | Data |
---|---|---|
f126d342 JH |
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:. | |
d7a2632b | 14 | : See if we want extra modules installed |
f126d342 | 15 | echo " " |
f126d342 | 16 | case "$extras" in |
355857e1 JH |
17 | '') dflt='n';; |
18 | *) dflt='y';; | |
f126d342 JH |
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 | |
3e1124c5 JH |
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. | |
f126d342 JH |
34 | |
35 | If this doesn't make any sense to you, just accept the default '$dflt'. | |
36 | EOM | |
3e1124c5 | 37 | rp='Install any extra modules (y or n)?' |
f126d342 JH |
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 | |
3e1124c5 JH |
45 | 'install' command of CPAN.pm will understand. (Answer 'none', |
46 | without the quotes, to install no extra modules or bundles.) | |
f126d342 JH |
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...)" | |
3e1124c5 JH |
59 | echo "$extras" > ../extras.lst |
60 | val="'$extras'" | |
f126d342 JH |
61 | ;; |
62 | esac | |
63 | set extras | |
64 | eval $setvar | |
65 | echo " " | |
66 |