perl/index.html.ja.iso-2022-jp

   1 <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
   2             "http://www.w3.org/TR/html4/loose.dtd">
   3 <html lang="ja">
   4 <head>
   5 <title>CHaracter Information Service Environment</title>
   6 <link rel=stylesheet href="../chise.css" type="text/css">
   7 </head>
   8 <body>
   9
  10     <p>
  11       [<a href="../index.html.ja.iso-2022-jp">CHISE</a>]
  12       [<a href="../xemacs/index.html.ja.iso-2022-jp">XEmacs UTF-2000</a>]
  13       [<a href="../ruby/index.html.ja.iso-2022-jp">Ruby/UTF-2000</a>]
  14       [Perl/CHISE]
  15       [<a href="../topicmaps/index.html.ja.iso-2022-jp">TopicMaps</a>]
  16       [<a href="../ids/index.html.ja.iso-2022-jp">IDS</a>]
  17       [<a href="../glyph/index.html.ja.iso-2022-jp">glyph</a>]
  18       [<a href="../visualization/index.html.ja.iso-2022-jp">Visualization</a>]
  19       [<a href="../omega/index.html.ja.iso-2022-jp">\e$B&8\e(B</a>]
  20     </p>
  21
  22 <h1>
  23 <a href="../index.html.ja.iso-2022-jp">CHISE</a> /
  24 <a name="ruby">Perl/CHISE</a>
  25 </h1>
  26
  27 <hr>
  28
  29     <p>
  30       CHISE \e$BJ8;z%G!<%?%Y!<%9!J8=>u$G$O\e(B XEmacs UTF-2000 \e$BMQ$N\e(B Berkeley DB
  31       \e$BHGJ8;z%G!<%?%Y!<%9!K$r\e(B Perl \e$B$+$i%"%/%;%9$9$k%b%8%e!<%k$r\e(B
  32       \e$B3+H/$7$F$$$^$9!#\e(B
  33     </p>
  34
  35 <h2>NAME</h2>
  36
  37     <p>
  38       UTF2000
  39     </p>
  40
  41 <h2>SYNOPSIS</h2>
  42
  43 <pre>use UTF2000;
  44
  45 my $s1 = UTF2000->new(ideograph_daikanwa => 6942); # \e$B!V;z!W\e(B
  46 print $s1->strokes, "\n"; # \e$B2h?t$rI=<(\e(B
  47
  48 my $s2 = UTF2000->new(shinjigen_2 => 1777); # \e$B!V;z!W\e(B
  49 print $s2->compare($s1) * 100, "%\n"; # $s1\e$B$H\e(B$s2\e$B$rHf3S$7$F0lCWN($rI=<(\e(B
  50
  51 # \e$B2h?t\e(B15\e$B!"\e$A2?JW\e(B9(\e$B$K$s$Y$s\e(B)\e$B$N4A;z$r?7$?$K:n$k\e(B
  52 my $s3 = UTF2000->define_char(strokes => 15, radical => 9);
  53 </pre>
  54
  55 <h2>METHOD</h2>
  56
  57 <h2>TO DO</h2>
  58
  59     <ul>
  60       <li>\e$B%G!<%?%Y!<%9$X$N%"%/%;%9$NCj>]2=\e(B</li>
  61       <li>\e$B%G!<%?%Y!<%9$N%"%/%;%9$N9bB.2=\e(B</li>
  62       <li>IDS\e$B$,$i$_\e(B
  63         <ul>
  64           <li><code>$s = UTF2000-&gt;define_char(ids =&gt; &quot;...&quot;)</code>
  65             \e$B$_$?$$$J$3$H$,$G$-$k$h$&$K!#\e(B
  66           <li>decompose\e$B%a%=%C%I\e(B</li>
  67           <li>include\e$B%a%=%C%I\e(B
  68             (\e$B$"$k%*%V%8%'%/%H$KItIJ$,4^$^$l$F$$$k$+D4$Y$k\e(Bboolean)</li>
  69           <li>KAGE\e$B%5!<%P$H$N@\B3\e(B</li>
  70         </ul></li>
  71       <li>\e$BB>$N\e(BOS\e$B$X$NBP1~\e(B
  72         <ul>
  73           <li>\e$B%G!<%?%Y!<%9$N\e(BPath(\e$B4D6-JQ?t!)\e(B)</li>
  74           <li>\e$B%G!<%?%Y!<%9$NG[I[J}K!\e(B</li>
  75         </ul></li>
  76       <li>\e$B%G!<%?%Y!<%9$X$N=q$-9~$_\e(B</li>
  77     </ul>
  78
  79
  80 <hr>
  81
  82 <h2>\e$BJ8=q!&H/I=\e(B</h2>
  83
  84     <ul>
  85       <li><a href="http://www.ya.sakura.ne.jp/~moro/">\e$B;ULP<y\e(B</a>
  86         \e$B!V\e(BUTF2000.pm: overview\e$B!W\e(B
  87         (CHISE14\e$B%7%s%]%8%&%`!"\e(BATR\e$B!"\e(B2003\e$BG/\e(B2\e$B7n\e(B1\e$BF|\e(B)
  88         <a href="../papers/20030201moro/20030201perlUTF2000.html">HTML</a>,
  89         <a href="../papers/20030201moro/20030201perlUTF2000.sxi">OpenOffice</a>
  90       </li>
  91     </ul>
  92
  93 <hr>
  94
  95     <p>
  96       [<a href="../">\e$BLa$k\e(B</a>]
  97     </p>
  98
  99     <p>
 100 <!-- hhmts start -->
 101 Last modified: Sun Feb  2 18:05:36 JST 2003
 102 <!-- hhmts end -->.
 103     </p>
 104
 105
 106 </body>
 107 </html>