05/11/09 10:59:04
ちょっと教えてください。
perlでdatを読もうとしてるのですが、range指定をしても全部読んじゃいます。
どこが間違っているのでしょうか？？
my $dat = "1131251940";
my $url = "URLﾘﾝｸ(ex10.2ch.net)" . $dat . ".dat";
my $date = "Tue, 08 Nov 2005 13:24:04 GMT";
my $browser = LWP::UserAgent->new();
my $response = $browser->get( $url,
'User-Agent' => 'Monazilla/1.00',
'Accept-Encoding' => 'gzip',
'If-Modified-Since' => $date,
'Range' => 'bytes=94749-',
'If-Range' => $date
);
die "\n$url を読み込めませんでした: ", $response->status_line unless $response->is_success();