師匠の散歩

きままにPerlでも

文字化けする文字

文字化けする文字をEUCで表示する/ showMojibake.cgi

文字化け

Shift_JISで文字化けする漢字一覧を表示する。漢字コードは正しいのだろうが、EUC-JPで表示するため漢字コード変換して表示しているため、Shift_JISのままで表示したのとは少し違うかもしれない。

foreach (0x81..0x9F, 0xE0..0xFC) 
  $char = pack('ca', $_, '\\');
  print jcode($char)->h2z->euc;
}
No.jcode($_)->h2z->euc;jcode($_)->h2z->sjis;
1\
2?\?\
3\
4Ы\
5?\?\
6?\?\
7?\?\
8?\?\
9\
10\
11\
12\
13\
14\
15\
16\
17\
18\
19\
20\
21\
22\
23\
24\
25\
26\
27\
28\
29\
30\
31\
32\
33\
34\
35\
36\
37\
38\
39\
40\
41\
42\
43?\?\
44?\?\
45?\?\
46?\?\
47?\?\
48?\?\
49?\?\
50?\?\
51?\?\
52?\?\
53?\?\
54?\?\
55?\?\
56?\?\
57?\?\
58?\?\
59?\?\
60?\?\

showMojibake.cgi // Topに戻る // indexに戻る
Copyright(C) 2009-2021 Grandmaster Last up : 2020/09/18