modified.

diff --git a/perl/index.html.ja.iso-2022-jp b/perl/index.html.ja.iso-2022-jp
index 4b6a905..452306b 100644 (file)
--- a/perl/index.html.ja.iso-2022-jp
+++ b/perl/index.html.ja.iso-2022-jp
@@ -67,7 +67,7 @@ my $s3 = CHISE->define_char(strokes => 15, radical => 9);
       <dt><code>del_attr(\e$BB0@-L>\e(B)</code></dt>
       <dd>\e$BJ8;z%*%V%8%'%/%H$+$iB0@-$r:o=|$9$k!#\e(B
       <dt><code>compare(\e$B%*%V%8%'%/%HL>\e(B)</code></dt>
-      <dd>\e$BJ8;z%*%V%8%'%/%H$NB0@-$I$&$7$rHf3S$7$F!"$=$N0lCWN(\e(B(0\e$B!e&A!e\e(B1)\e$B$rJV$9!#\e(B
+      <dd>\e$BJ8;z%*%V%8%'%/%H$NB0@-$I$&$7$rHf3S$7$F!"$=$N=E$J$j6q9g$rJV$9!#\e(B
     </dl>
 
 <h2>TO DO</h2>
@@ -118,7 +118,7 @@ my $s3 = CHISE->define_char(strokes => 15, radical => 9);
 
     <p>
 <!-- hhmts start -->
-Last modified: Wed Feb 12 14:47:00 JST 2003
+Last modified: Thu Mar 13 01:54:38 JST 2003
 <!-- hhmts end -->.
     </p>