# charset="CP932"
# encoding="CP932"
# KanaKiller では詳細な設定が出来ないっ!
# 取り敢へず假名部分だけ。外字を下駄に…は、未だ (NKF で済むし)

#!/usr/bin/perl -pi.bak

# X0208 alphabet to ASCII
s/０/0/g;	s/１/1/g;	s/２/2/g;	s/３/3/g;	s/４/4/g;
s/５/5/g;	s/６/6/g;	s/７/7/g;	s/８/8/g;	s/９/9/g;

s/Ａ/A/g;	s/Ｂ/B/g;	s/Ｃ/C/g;	s/Ｄ/D/g;	s/Ｅ/E/g;
s/Ｆ/F/g;	s/Ｇ/G/g;	s/Ｈ/H/g;	s/Ｉ/I/g;	s/Ｊ/J/g;
s/Ｋ/K/g;	s/Ｌ/L/g;	s/Ｍ/M/g;	s/Ｎ/N/g;	s/Ｏ/O/g;
s/Ｐ/P/g;	s/Ｑ/Q/g;	s/Ｒ/R/g;	s/Ｓ/S/g;	s/Ｔ/T/g;
s/Ｕ/U/g;	s/Ｖ/V/g;	s/Ｗ/W/g;	s/Ｘ/X/g;	s/Ｙ/Y/g;	s/Ｚ/Z/g;

s/ａ/a/g;	s/ｂ/b/g;	s/ｃ/c/g;	s/ｄ/d/g;	s/ｅ/e/g;
s/ｆ/f/g;	s/ｇ/g/g;	s/ｈ/h/g;	s/ｉ/i/g;	s/ｊ/j/g;
s/ｋ/k/g;	s/ｌ/l/g;	s/ｍ/m/g;	s/ｎ/n/g;	s/ｏ/o/g;
s/ｐ/p/g;	s/ｑ/q/g;	s/ｒ/r/g;	s/ｓ/s/g;	s/ｔ/t/g;
s/ｕ/u/g;	s/ｖ/v/g;	s/ｗ/w/g;	s/ｘ/x/g;	s/ｙ/y/g;	s/ｚ/z/g;

s/　/  /g;	s/！/!/g;	s/？/?/g;	s/＆/&/g;	s/＃/#/g;	s/＄/$/g;
s/％/%/g;	s/−/-/g;	s/＋/+/g;	s/＊/*/g;	s#／#/#g;	s/＼/\\/g;

s/＜/ </g;	s/＞/> /g;
s/；/; /g;	s/：/: /g;
# s/‘/ `/g;	s/’/' /g;
# s/“/ "/g;	s/”/" /g;
s/（/ (/g;	s/）/) /g;
s/｛/ {/g;	s/｝/} /g;
s/［/ [/g;	s/］/] /g;

s/・・・/…/g;
s/・・/‥/g;
s/･･･/…/g;
s/･･/‥/g;
s/･/・/g;

# JIS X 0201 Kana -> JIS X 0208 Kana
s/�/　/g;	s/･/・/g;
s/｡/。/g;	s/､/、/g;
s/｢/「/g;	s/｣/」/g;
s/ﾞ/゛/g;	s/ﾟ/゜/g;
s/ｧ/ァ/g;	s/ｨ/ィ/g;	s/ｩ/ゥ/g;	s/ｪ/ェ/g;	s/ｫ/ォ/g;
s/ｬ/ャ/g;	s/ｭ/ュ/g;	s/ｮ/ョ/g;	s/ｯ/ッ/g;	s/ｰ/ー/g;
s/ｱ/ア/g;	s/ｲ/イ/g;	s/ｳ/ウ/g;	s/ｴ/エ/g;	s/ｵ/オ/g;
s/ｶ/カ/g;	s/ｷ/キ/g;	s/ｸ/ク/g;	s/ｹ/ケ/g;	s/ｺ/コ/g;
s/ｻ/サ/g;	s/ｼ/シ/g;	s/ｽ/ス/g;	s/ｾ/セ/g;	s/ｿ/ソ/g;
s/ﾀ/タ/g;	s/ﾁ/チ/g;	s/ﾂ/ツ/g;	s/ﾃ/テ/g;	s/ﾄ/ト/g;
s/ﾅ/ナ/g;	s/ﾆ/ニ/g;	s/ﾇ/ヌ/g;	s/ﾈ/ネ/g;	s/ﾉ/ノ/g;
s/ﾊ/ハ/g;	s/ﾋ/ヒ/g;	s/ﾌ/フ/g;	s/ﾍ/ヘ/g;	s/ﾎ/ホ/g;
s/ﾏ/マ/g;	s/ﾐ/ミ/g;	s/ﾑ/ム/g;	s/ﾒ/メ/g;	s/ﾓ/モ/g;
s/ﾔ/ヤ/g;			s/ﾕ/ユ/g;			s/ﾖ/ヨ/g;
s/ﾗ/ラ/g;	s/ﾘ/リ/g;	s/ﾙ/ル/g;	s/ﾚ/レ/g;	s/ﾛ/ロ/g;
s/ﾜ/ワ/g;							s/ｦ/ヲ/g;
s/ﾝ/ン/g;

s/カ゛/ガ/g;	s/キ゛/ギ/g;	s/ク゛/グ/g;	s/ケ゛/ゲ/g;	s/コ゛/ゴ/g;
s/サ゛/ザ/g;	s/シ゛/ジ/g;	s/ス゛/ズ/g;	s/セ゛/ゼ/g;	s/ソ゛/ゾ/g;
s/タ゛/ダ/g;	s/チ゛/ヂ/g;	s/ツ゛/ヅ/g;	s/テ゛/デ/g;	s/ト゛/ド/g;
s/ハ゛/バ/g;	s/ヒ゛/ビ/g;	s/フ゛/ブ/g;	s/ヘ゛/ベ/g;	s/ホ゛/ボ/g;
s/ハ゜/パ/g;	s/ヒ゜/ピ/g;	s/フ゜/プ/g;	s/ヘ゜/ペ/g;	s/ホ゜/ポ/g;
s/ウ゛/ヴ/g;
__END__

#!/usr/bin/jsed -f

# X0208 alphabet to ASCII == nkf -Z
y/ＡＢＣＤＥＦＧＨＩＪＫＬＭＮＯＰＱＲＳＴＵＶＷＸＹＺ/ABCDEFGHIJKLMNOPQRSTUVWXYZ/
y/ａｂｃｄｅｆｇｈｉｊｋｌｍｎｏｐｑｒｓｔｕｖｗｘｙｚ/abcdefghijklmnopqrstuvwxyz/
y/０１２３４５６７８９/0123456789/

y/！/!/
y/？/?/
y/＆/&/
y/＃/#/
y/＄/$/
y/％/%/
y/−/-/
y/＋/+/
y/＊/*/
y!／!/!
y!＼!\!

y/＜/</
y/＞/>/
#s/＜/ </g
#s/＞/> /g

s/　/  /g

s/；/; /g
s/：/: /g

s/‘/ `/g
s/’/' /g
s/“/ "/g
s/”/" /g

s/（/ (/g
s/）/) /g
s/｛/ {/g
s/｝/} /g
s/［/ [/g
s/］/] /g

s/・・・/…/g
s/・・/‥/g
s/･･･/…/g
s/･･/‥/g
y/･/・/

# JIS X 0201 Kana -> JIS X 0208 Kana (sed-jp only)
y/�｡｢｣､･ｦｧｨｩｪｫｬｭｮｯｰｱｲｳｴｵ/ 。「」、・ヲァィゥェォャュョッーアイウエオ/
y/ｶｷｸｹｺｻｼｽｾｿﾀﾁﾂﾃﾄﾅﾆﾇﾈﾉ/カキクケコサシスセソタチツテトナニヌネノ/
y/ﾊﾋﾌﾍﾎﾏﾐﾑﾒﾓﾔﾕﾖﾗﾘﾙﾚﾛﾜﾝﾞﾟ/ハヒフヘホマミムメモヤユヨラリルレロワン゛゜/

s/カ゛/ガ/g;	s/キ゛/ギ/g;	s/ク゛/グ/g;	s/ケ゛/ゲ/g;	s/コ゛/ゴ/g
s/サ゛/ザ/g;	s/シ゛/ジ/g;	s/ス゛/ズ/g;	s/セ゛/ゼ/g;	s/ソ゛/ゾ/g
s/タ゛/ダ/g;	s/チ゛/ヂ/g;	s/ツ゛/ヅ/g;	s/テ゛/デ/g;	s/ト゛/ド/g
s/ハ゛/バ/g;	s/ヒ゛/ビ/g;	s/フ゛/ブ/g;	s/ヘ゛/ベ/g;	s/ホ゛/ボ/g
s/ハ゜/パ/g;	s/ヒ゜/ピ/g;	s/フ゜/プ/g;	s/ヘ゜/ペ/g;	s/ホ゜/ポ/g
s/ウ゛/ヴ/g