HTTP::Response->contentの罠 - Pixel Pedals of Tomakomai

えっ、と思った現象です。 my $mech = WWW::Mechanize->new; my $res = $mech->get('http://〜〜〜〜.jpg'); warn "mech->content: " . length($mech->content) . "\n"; warn "res->content : " . length($res->content) . "\n"; # 結果 mech->content: 5078 res->content : 4582 Mechanize->contentって、Response->contentを返してるわけじゃないのですね。 まとめ WEBページから圧縮されたデータを受け取る場合は、以下に気をつけましょう。 HTTP::Response->content は使わない HTTP::Response->decoded_content