#!/usr/local/bin/perl
use utf8; ## This file is written in UTF-8
use strict;
require 'mkpm.pl';
use vars qw(%PROP %SET %SET_ALIAS);
$PROP{module_name} = 'JaInput';
$PROP{version} = do{my @r=(q$Revision: 1.1 $=~/\d+/g);sprintf "%d."."%02d" x $#r,@r};
$PROP{author_name} = 'わかば (Wakaba)';
$PROP{author_mail} = 'w@suika.fam.cx';
$PROP{pod_description} = <), 1998.
JIS X 4063:2000, 『仮名漢字変換システムのための英字キー入力から仮名への変換方式
(Keystroke to KANA Transfer Method Using Latin Letter Key for Japanese Input
Method)』, 日本工業標準調査会), 2000.
JIS X 4064:2002, 『仮名漢字変換システムの基本機能
(Basic functions of Kana‐Kanji conversion systems)』,
日本工業標準調査会, 2000.
JIS X 6002-1980, 『情報処理系けん盤配列 (Keyboard Layout for Information Processing
Using the JIS 7 Bit Coded Character Set)』,
日本工業標準調査会, 1980.
EOH
$SET{Yomi} = <¥$%#*@'"~)
=cut
$SET{Digit} = <?@{\N{YEN SIGN}}^_`{|} ̄
EOH
$SET{KatakanaSymbol} = <