文鐃緒申鐃緒申鐃緒申鐃宿とワ申鐃藷コ￥申鐃叔ワ申鐃緒申 (2)

JIS X 0208 鐃祝わ申未鐃緒申鐃緒申琉茲�醐申澆鐃緒申泙鐃緒申鐃緒申鐃緒申鐃緒申鐃� 鐃駿ワ申鐃緒申鐃緒申鐃緒申鐃緒申文鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃塾を機種申鐃渋己醐申鐃緒申噺鐃緒申鐃緒申泙鐃緒申鐃�

鐃緒申鐃緒申鐃渋己醐申鐃緒申亮鐃緒申鐃緒申文鐃緒申鐃緒申鐃緒申鐃宿につわ申鐃銃わ申 http://www2d.biglobe.ne.jp/~msyk/charcode/kisyuizon/index.html 鐃緒申鐃緒申鐃緒申鐃叔わ申鐃緒申鐃獣に￥申鐃緒申鐃緒申鐃緒申砲鐃� Windows 鐃縦駈申鐃緒申鐃淑わ申鐃獣わ申鐃塾で￥申鐃夙ても参鐃粛になわ申泙鐃緒申鐃緒申鐃�

半鐃術ワ申鐃淑とわ申

半鐃術ワ申鐃淑とは￥申JIS X 0201 鐃塾縁申半鐃縮にわ申鐃暑カ鐃緒申鐃緒申鐃緒申文鐃緒申鐃叔わ申鐃緒申 Shift_JIS鐃緒申EUC-JP 鐃叔は￥申半鐃術ワ申鐃淑わ申箸辰討盥緒申鐃緒申泙鐃緒申鐃� 鐃緒申鐃緒申鐃緒申鐃緒申ISO-2022-JP 鐃叔は使ってはわ申鐃緒申鐃淑わ申鐃塾でわ申鐃緒申

鐃緒申鐃駿鰹申認鐃緒申鐃銃わ申鐃緒申鐃殉わ申鐃緒申鐃緒申JIS X 0208 鐃緒申 JIS X 0201 鐃淑どわ申文鐃緒申鐃緒申鐃瞬刻申鐃緒申鐃銃わ申鐃緒申文鐃緒申鐃緒申鐃緒申任鐃緒申鐃緒申鐃緒申鐃緒申鐃�Shift_JIS鐃緒申 EUC-JP鐃緒申ISO-2022-JP 鐃淑どはワ申鐃藷コ￥申鐃叔ワ申鐃藷グ￥申鐃縦まわ申 JIS X 0208鐃緒申JIS X 0201 鐃淑どの駕申鐃緒申鐃準か鐃緒申文鐃緒申鐃緒申鐃緒申鐃� 同鐃緒申鐃祝逸申鐃緒申鐃緒申鐃緒申鐃緒申鐃祝￥申鐃緒申瓩随申鐃塾でわ申鐃緒申

鐃緒申動鐃術器申

鐃殉わ申鐃熟居申鐃緒申鐃渋己醐申鐃緒申鐃緒申蕁� 鐃緒申1鐃巡ギ鐃所シ鐃緒申文鐃緒申鐃淑どの居申鐃緒申鐃渋己醐申鐃緒申蓮鐃� JIS X 0208 鐃緒申未鐃緒申鐃緒申琉鐃祝鰹申鐃緒申鐃緒申討鐃緒申討鐃緒申泙鐃緒申鐃� UNIX 鐃緒申 OS 鐃叔は￥申鐃緒申鐃緒申鐃緒申分鐃緒申鐃出縁申鐃緒申鐃緒申侫鐃緒申鐃夙わ申鐃術意わ申鐃緒申討鐃緒申覆鐃緒申鐃緒申瓠� 鐃緒申鐃緒申鐃塾駈申鐃緒申妨鐃緒申鐃緒申泙鐃緒申鐃�Mac 鐃叔わ申鐃緒申鐃緒申鐃縮のフワ申鐃緒申箸鐃緒申鐃緒申鐃緒申鐃銃わ申鐃銃わ申鐃暑た鐃潤、鐃縮わ申文鐃緒申鐃祝醐申鐃緒申鐃殉わ申鐃緒申

web 鐃淑わ申討里呂匹隆超鐃緒申鐃緒申鐃叔もア鐃緒申鐃緒申鐃緒申鐃叔わ申鐃緒申里鐃縮ワ申呂覆里任鐃緒申鐃緒申蕁� 鐃緒申鐃緒申鐃緒申鐃緒申鐃純害鐃緒申 CGI 鐃竣ワ申鐃緒申鐃緒申鐃渋�申納鐃緒申鐃緒申鐃緒申泙鐃緒申腓�申鐃�

鐃純え鐃出器申1鐃緒申 EUC-JP 鐃叔わ申 0xADA1 鐃祝なわ申泙鐃緒申鐃緒申鐃� Shift-JIS 鐃叔わ申 0x8740鐃緒申ISO-2022-JP 鐃叔わ申 0x2D21 鐃祝なわ申泙鐃緒申鐃� 鐃叔わ申鐃緒申鐃初、鐃殉わ申文鐃緒申鐃緒申鐃緒申鐃宿わ申鐃緒申鐃曙し鐃銃わ申鐃初機鐃緒申鐃渋己醐申鐃緒申鐃緒申儡鐃緒申鐃緒申鐃塾わ申鐃緒申鐃緒申擇任鐃緒申鐃� 鐃緒申鐃緒申鐃叔わ申文鐃緒申鐃緒申鐃� 鐃殉わ申 EUC-JP 鐃緒申鐃術器申鐃緒申鐃銃￥申鐃緒申鐃曙か鐃緒申 0xADA1 鐃緒申 (1) 鐃祝￥申 0xADA2 鐃緒申 (2) 鐃緒申鐃術器申鐃縦とわ申鐃緒申鐃春わ申鐃祝わ申鐃殉わ申鐃順う鐃緒申

鐃殉わ申鐃竣わ申鐃春わ申鐃塾わ申

require 'jcode.pl';
$str = "鐃緒申1鐃緒申2"; # 鐃瞬居申鐃緒申鐃渋己醐申鐃緒申隆鐃�1鐃竣「居申鐃緒申鐃渋己醐申鐃緒申隆鐃�2鐃竣わ申鐃夙思って駕申鐃緒申鐃緒申鐃緒申
&jcode::convert(\$str,'euc');
$str =~ s/\xAD\xA1/(1)/g;
$str =~ s/\xAD\xA2/(2)/g;
....

鐃夙わ申鐃緒申鐃緒申鐃緒申鐃叔わ申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申単鐃緒申鐃緒申儡鐃緒申任魯鐃緒申鐃叔わ申鐃緒申鐃淑わ申鐃緒申鐃夙わ申鐃緒申鐃夙…駕申鐃盾し鐃出わ申鐃緒申長鐃緒申鐃淑わ申里鐃� http://www.din.or.jp/~ohzaki/perl.htm#JP_Match 鐃緒申鐃宿わ申撚鐃緒申鐃緒申鐃緒申鐃�

鐃淑わ申鐃緒申鐃緒申鐃塾ペ￥申鐃緒申鐃熟とても参鐃粛になわ申泙鐃緒申鐃�perl 鐃緒申 CGI 鐃塾駕申鐃緒申箸鐃緒申鐃緒申函鐃� 鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申粘岼磴わ申鐃緒申蕕縁申離據鐃緒申鐃緒申鐃渋随申鐃緒申里任鐃緒申鐃緒申鐃� 鐃緒申鐃緒申鐃熟随申鐃緒申鐃淑わ申鐃緒申鐃緒申鐃緒申鐃緒申鐃塾種申鐃緒申鐃緒申鐃緒申鐃緒申廛據鐃緒申鐃緒申任鐃緒申鐃緒申鐃緒申鐃緒申匹澆泙鐃緒申腓�申鐃�

鐃夙わ申鐃緒申鐃緒け鐃叔￥申鐃緒申動鐃術器申鐃緒申鐃緒申鐃緒申粉鐃緒申鐃緒申砲覆鐃殉わ申鐃緒申

conv-wrong-char.cgi (鐃渋行件申鐃�)

    1: #!/usr/local/bin/perl
    2: 
    3: # 鐃緒申分鐃緒申鐃夙のフワ申鐃緒申鐃緒申名鐃緒申鐃緒申鐃�
    4: $script_name = $ENV{SCRIPT_NAME};
    5: $script_name =~ s|.*/([^/]+)$|$1|;
    6: 
    7: print <<END;
    8: Content-type: text/html
    9: 
   10: <HTML><BODY BGCOLOR="#eeeeee">
   11: <CENTER><H1>半鐃術ワ申鐃淑￥申鐃緒申鐃緒申鐃渋己醐申鐃緒申儡鐃緒申侫鐃緒申鐃緒申鐃�</H1></CENTER>
   12: <HR NOSHADE><TABLE BORDER><TR><TD><PRE>
   13: --[半鐃術ワ申鐃緒申]----------------------------------------------------
   14: 鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃渋ﾃﾄﾅﾆﾇﾈﾉﾊﾋﾌ�申鐃塾ﾏﾐﾑﾒﾓﾔﾕﾖﾗﾘﾙﾚﾛﾜﾝﾞ�申
   15: --[13鐃緒申]--------------------------------------------------------
   16:

文鐃緒申鐃緒申鐃緒申鐃宿とワ申鐃藷コ￥申鐃叔ワ申鐃緒申 (2)

鐃緒申鐃緒申鐃渋己醐申鐃緒申箸鐃�

半鐃術ワ申鐃淑とわ申

鐃緒申動鐃術器申