iww https://blog.hatena.ne.jp/iww/ 揮発性のメモ２ https://iww.hateblo.jp/ perl バイナリファイルを読む練習。 ファイルの先頭部分を読み込んで、GZIPのヘッダ(0x1F,0x8B,0x08,0x00)を探し、その先頭位置を出力するプログラム。 #!/usr/bin/perl use strict; use warnings; my $size=32768; open( my $fh, $ARGV[0] ) or die("open"); binmode($fh); read( $fh, my $buf, $size ) or die("read"); my @d = unpack( "C*", $buf ); for( my $i=0; $i<$size-4; $i++ … 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fiww.hateblo.jp%2Fentry%2F20130323%2Funpack" title=" ファイルをバイナリとして読み込む - 揮発性のメモ２" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> Hatena Blog https://hatena.blog 2013-03-23 00:00:00 rich https://iww.hateblo.jp/entry/20130323/unpack 1.0 100%