# charset="X-MAC-JAPANESE"
# encoding="X-MAC-JAPANESE"
# �C������ @ Mac Japanese �� ASCII ��

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

s/�^|�@|�|/(1)/g;
s/�_|�A|�}/(2)/g;
s/�`|�B|�~/(3)/g;
s/�a|�C|��/(4)/g;
s/�b|�D|��/(5)/g;
s/�c|�E|��/(6)/g;
s/�d|�F|��/(7)/g;
s/�e|�G|��/(8)/g;
s/�f|�H|��/(9)/g;
s/�g|�I/(10)/g;
s/�h|�J/(11)/g;
s/�i|�K/(12)/g;
s/�j|�L/(13)/g;
s/�k|�M/(14)/g;
s/�l|�N/(15)/g;
s/�m|�O/(16)/g;
s/�n|�P/(17)/g;
s/�o|�Q/(18)/g;
s/�p|�R/(19)/g;
s/�q|�S/(20)/g;

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;
__END__

#!/usr/bin/jsed -f

s/[�^�@�|]/(1)/g
s/[�_�A�}]/(2)/g
s/[�`�B�~]/(3)/g
s/[�a�C��]/(4)/g
s/[�b�D��]/(5)/g
s/[�c�E��]/(6)/g
s/[�d�F��]/(7)/g
s/[�e�G��]/(8)/g
s/[�f�H��]/(9)/g
s/[�g�I]/(10)/g
s/[�h�J]/(11)/g
s/[�i�K]/(12)/g
s/[�j�L]/(13)/g
s/[�k�M]/(14)/g
s/[�l�N]/(15)/g
s/[�m�O]/(16)/g
s/[�n�P]/(17)/g
s/[�o�Q]/(18)/g
s/[�p�R]/(19)/g
s/[�q�S]/(20)/g
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