2009-03-12 Perl で任意のアドレスを peek 804d000H から1バイト読む例。poke できないのかなー print unpack('P1', pack('L', 0x804d000)); 参考: http://pub.ne.jp/wakapon/?entry_id=1253761