U/perl/perladmin.U

   1 ?RCS: Copyright (c) 1996, Andy Dougherty
   2 ?RCS:
   3 ?RCS: You may distribute under the terms of either the GNU General Public
   4 ?RCS: License or the Artistic License, as specified in the README file.
   5 ?RCS:
   6 ?MAKE:perladmin: cf_email Oldconfig Myread cat
   7 ?MAKE:  -pick add $@ %<
   8 ?Y:TOP
   9 ?S:perladmin:
  10 ?S:     Electronic mail address of the perl5 administrator.
  11 ?S:.
  12 : Ask e-mail of administrator
  13 $cat <<EOM
  14
  15 If you or somebody else will be maintaining perl at your site, please
  16 fill in the correct e-mail address here so that they may be contacted
  17 if necessary. Currently, the "perlbug" program included with perl
  18 will send mail to this address in addition to perlbug@perl.org. You may
  19 enter "none" for no administrator.
  20
  21 EOM
  22 case "$perladmin" in
  23 '') dflt="$cf_email";;
  24 *) dflt="$perladmin";;
  25 esac
  26 rp='Perl administrator e-mail address'
  27 . ./myread
  28 perladmin="$ans"
  29