本を読む

読書やコンピュータなどに関するメモ

LWPでinflate

 とあるページが、wgetしても、PerlでLWP::Simple::get()しても、謎の(fileコマンドでbinary dataとしか認識されない)バイナリデータしか得られないという状態だった。

 というわけで、inflateしてみた。

use LWP::Simple;
use IO::Uncompress::Inflate qw( inflate $InflateError );

my $url = 'http://example.org/hoge/';
my $dat = get($url) or die "cannor read: $url";
my $output;
inflate \$dat, \$output or die "inflate failed: $InflateError\n";

 結果オーライ。

コメント

コメントの投稿

管理者にだけ表示を許可する

トラックバック

http://emasaka.blog65.fc2.com/tb.php/425-e771c203

 | HOME | 

Categories

Recent Entries

Recent Comments

Recent Trackbacks

Appendix

emasaka

emasaka

フリーター。
連絡先はこのへん

Monthly


FC2Ad