#
# oki2canna.pl - ²Æì¼½ñ¤Î¥Õ¥¡¥¤¥ë¤òCanna¤Ë»ý¤Ã¤Æ¹Ô¤¯¤¿¤á¤Î¥¹¥¯¥ê¥×¥È
# ¿ð·ÄÍ÷ä
-# $Id: oki2canna.pl,v 1.17 2002/12/31 06:50:09 ga2 Exp $
+# $Id: oki2canna.pl,v 1.18 2005/11/03 01:49:40 void Exp $
# »ÈÍÑÎã:
# $ nkf -e *.dic | ./oki2canna.pl | sort -u > okinawa.txt
# $ mkbindic okinawa.txt
print "$phonate #T05 $word\n";
}
elsif ($class eq "À«") {
- print "$phonate #JN $word\n";
+ print "$phonate #JNS $word\n";
}
elsif ($class eq "̾") {
- print "$phonate #JN $word\n";
+ print "$phonate #JNM $word\n";
}
elsif ($class eq "¤½¤Î¾¤Î¿Í̾") {
print "$phonate #JN $word\n";