Perl/UTF-2000 page added.
authorMORO, Shigeki <s-moro@hanazono.ac.jp>
Tue, 28 Jan 2003 02:28:40 +0000 (02:28 +0000)
committerMORO, Shigeki <s-moro@hanazono.ac.jp>
Tue, 28 Jan 2003 02:28:40 +0000 (02:28 +0000)
index.html.ja.iso-2022-jp
perl/index.html.ja.iso-2022-jp [new file with mode: 0644]

index adfbd52..fcc9c6f 100644 (file)
@@ -73,6 +73,7 @@ CHISE (CHaracter Information Service Environment)
        <ul>
          <li><a href="xemacs/index.html.ja.iso-2022-jp">XEmacs UTF-2000</a>
          <li><a href="ruby/index.html.ja.iso-2022-jp">Ruby/UTF-2000</a>
+         <li><a href="perl/index.html.ja.iso-2022-jp">Perl/UTF-2000</a>
        </ul>
       </li>
       <li><a href="topicmaps/index.html.ja.iso-2022-jp">TopicMaps\e$B$K$h$kJ8;zCN<1%G!<%?%Y!<%9!&%7%9%F%`$N3+H/\e(B</a></li>
@@ -254,7 +255,7 @@ ATR \e$B?M4V>pJs2J3X8&5f=j\e(B
 <hr>
 
 <!-- hhmts start -->
-Last modified: Thu Jan 16 11:58:58 JST 2003
+Last modified: Tue Jan 28 11:26:25 JST 2003
 <!-- hhmts end -->.
 <a href="http://www.aurora.dti.ne.jp/~zom/Counter/index.html">
 <img
diff --git a/perl/index.html.ja.iso-2022-jp b/perl/index.html.ja.iso-2022-jp
new file mode 100644 (file)
index 0000000..ebd2e1c
--- /dev/null
@@ -0,0 +1,92 @@
+<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
+            "http://www.w3.org/TR/html4/loose.dtd">
+<html lang="ja">
+<head>
+<title>CHaracter Information Service Environment</title>
+<link rel=stylesheet href="../chise.css" type="text/css">
+</head>
+<body>
+
+    <p>
+      [<a href="../index.html.ja.iso-2022-jp">CHISE</a>]
+      [<a href="../xemacs/index.html.ja.iso-2022-jp">XEmacs UTF-2000</a>]
+      [<a href="../ruby/index.html.ja.iso-2022-jp">Ruby/UTF-2000</a>]
+      [Perl/UTF-2000]
+      [<a href="../topicmaps/index.html.ja.iso-2022-jp">TopicMaps</a>]
+      [<a href="../ids/index.html.ja.iso-2022-jp">IDS</a>]
+      [<a href="../glyph/index.html.ja.iso-2022-jp">glyph</a>]
+      [<a href="../visualization/index.html.ja.iso-2022-jp">Visualization</a>]
+      [<a href="../omega/index.html.ja.iso-2022-jp">\e$B&8\e(B</a>]
+    </p>
+
+<h1>
+<a href="../index.html.ja.iso-2022-jp">CHISE</a> / 
+<a name="ruby">Perl/UTF-2000</a>
+</h1>
+
+<hr>
+
+    <p>
+      CHISE \e$BJ8;z%G!<%?%Y!<%9!J8=>u$G$O\e(B XEmacs UTF-2000 \e$BMQ$N\e(B Berkeley DB
+      \e$BHGJ8;z%G!<%?%Y!<%9!K$r\e(B Perl \e$B$+$i%"%/%;%9$9$k%b%8%e!<%k$r\e(B
+      \e$B3+H/$7$F$$$^$9!#\e(B
+    </p>
+
+<h2>NAME</h2>
+
+    <p>
+      UTF2000
+    </p>
+
+<h2>SYNOPSIS</h2>
+
+<pre>use UTF2000;
+
+# \e$B=t66HV9f$KBP1~$9$k4A;z$N2h?t$rI=<($9$k\e(B
+my $s = UTF2000->new(ideograph_daikanwa => 8916);
+print $s->strokes, "\n";
+
+# \e$B2h?t\e(B15\e$B!"It<s\e(B11(\e$BF~\e(B)\e$B$N4A;z\e(B
+my $s1 = UTF2000->new(strokes => 15, radical => 11);
+print join("\n", $s1->morohashi_daikanwa), "\n";</pre>
+
+<h2>METHOD</h2>
+
+<h2>TO DO</h2>
+
+    <ul>
+      <li>\e$B%G!<%?%Y!<%9$X$N%"%/%;%9$NCj>]2=\e(B</li>
+      <li>\e$B%G!<%?%Y!<%9$N%"%/%;%9$N9bB.2=\e(B</li>
+      <li>IDS\e$B$,$i$_\e(B
+       <ul>
+         <li><code>$s = UTF2000-&gt;new(ids =&gt; &quot;...&quot;)</code>
+           \e$B$_$?$$$J$3$H$,$G$-$k$h$&$K!#\e(B
+         <li>decompose\e$B%a%=%C%I\e(B</li>
+         <li>include\e$B%a%=%C%I\e(B
+           (\e$B$"$k%*%V%8%'%/%H$KItIJ$,4^$^$l$F$$$k$+D4$Y$k\e(Bboolean)</li>
+         <li>KAGE\e$B%5!<%P$H$N@\B3\e(B</li>
+       </ul></li>
+      <li>\e$BB>$N\e(BOS\e$B$X$NBP1~\e(B
+       <ul>
+         <li>\e$B%G!<%?%Y!<%9$N\e(BPath(\e$B4D6-JQ?t!)\e(B)</li>
+         <li>\e$B%G!<%?%Y!<%9$NG[I[J}K!\e(B</li>
+       </ul></li>
+      <li>\e$B%G!<%?%Y!<%9$X$N=q$-9~$_\e(B</li>
+    </ul>
+           
+
+<hr>
+
+    <p>
+      [<a href="../">\e$BLa$k\e(B</a>]
+    </p>
+
+    <p>
+<!-- hhmts start -->
+Last modified: Tue Jan 28 05:39:31 JST 2003
+<!-- hhmts end -->.
+    </p>
+
+
+</body>
+</html>