#文字コード全出力エンジン(参考用スクリプト)
print "<TABLE BORDER=\"0\">";
print "<TR>";
$s=0;
foreach (0x00..0xFF) {
foreach (0x00..0x80, 0xA0..0xD9, 0xFD..0xFF) {
print "<TD>";
print pack('c', $_);
$s++;
print "</TD>";
if($s == 16){
$s=0;
print "</TR>\n<TR>";
}
}
print "</TR>";
foreach (0x81..0x9F, 0xE0..0xFC) {
$First = $_;
$s=0;
print "<TR>";
foreach (0x00..0xFF){
print "<TD>";
print pack('cc', $First, $_);
$s++;
print "</TD>";
if($s == 16){
$s=0;
print "</TR>\n<TR>";
}
}
print "</TR>";
}
print "\n";
いまどきPerlというのが なんとも よねっと らしいw実際問題PHPなんて知らないだけなのですよw何PHPって やっぱPerlが最高だろ!とおじいちゃんみたいなこと言ってみる…_| ̄|○
投稿者-> yo-net at 2004年02月24日 14:31 | TrackBack(0)Su | Mo | Tu | We | Th | Fr | Sa |
---|---|---|---|---|---|---|
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 |