- 589 名前：デフォルトの名無しさん [2008/11/30(日) 14:57:09 ]
- 過去ログにもうあったらごめんなさい。
HTTP::Requestで画像ファイル(gif)を取得して、サーバに保存したいのですが、
$response->content()をそのまま保存しても画像になりません。
コード
my $req = new HTTP::Request("GET",$url);
local $response = $ua->request($req);
print "Content-type: text/html\n\n";
print $response->code();
print $response->message();
print $response->content();
open OUT,">> ./maptest.gif";
print OUT $response->content();
close OUT;
環境はwindowsXP perl v5.10.0 Apache2.2です
誘導でもかまいませんので、ヒントをください。
