U/perl/usecjk.U

   1 ?RCS: $Id$
   2 ?RCS:
   3 ?RCS: Copyright (c) 2002 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:usecjk: Myread Oldconfig Setvar
   9 ?MAKE:  -pick add $@ %<
  10 ?Y:TOP
  11 ?S:usecjk:
  12 ?S:     This variable conditionally defines the USE_CJK symbol,
  13 ?S:     and indicates that Perl should be built to use CJK.
  14 ?S:.
  15 ?C:USE_CJK:
  16 ?C:     This symbol, if defined, indicates that Perl should
  17 ?C:     be built to use the CJK support of Encode.
  18 ?C:.
  19 ?H:?%<:#ifndef USE_CJK
  20 ?H:?%<:#$usecjk USE_CJK         /**/
  21 ?H:?%<:#endif
  22 ?H:.
  23 ?LINT:set usecjk
  24 ?LINT:set useperlio
  25 ?LINT:extern useperlio
  26 ?LINT:change useperlio
  27 ?INIT:: set usecjk on the Configure command line to enable cjk.
  28 ?X: We should really have some explanatory text here, and some
  29 ?X: automatic setting of sensible defaults.
  30 case "$usecjk" in
  31 ''|$define|true|[yY]*)  dflt='y';;
  32 *) dflt='n';;
  33 esac
  34 cat <<EOM
  35
  36 Starting from 5.8.0 Perl comes with encoding support for the CJK languags
  37 (Chinese-Japanese-Korean, CN/JP/KR/TW).  Normally shared libraries are used,
  38 which means that the (relatively large, a few megabytes total) CJK encodings
  39 are loaded on demand (not consuming any memory if the are unused).  However,
  40 if you are building Perl statically, and/or are space-constrained, and
  41 if you are certain you won't be needing CJK support, you may consider
  42 leaving it out.  Note that the CJK support will always be built, but
  43 if you choose not to have it, it will be skipped in the installation phase.
  44
  45 If this doesn't make any sense to you, just accept the default '$dflt'.
  46 EOM
  47 rp='Build Perl for CJK?'
  48 . ./myread
  49 case "$ans" in
  50 y*|Y*)  val="$define" ;;
  51 *)      val="$undef"  ;;
  52 esac
  53 set usecjk
  54 eval $setvar
  55