in reply to How to download a range of bytes?

This seems to work: 
#!/usr/bin/perl -w
use strict;
use LWP::UserAgent;
my $ua = LWP::UserAgent->new;
my $url = 'http://localhost/...';
$ua->default_headers->push_header(Range => "bytes=1000-2000");
my $response = $ua->get($url);
my $content = $response->content();
warn length($content);
warn $content;

[download]
To get the current content length of the object, you can do a HEAD before and look at the content-length header.

Replies are listed 'Best First'.
Re^2: How to download a range of bytes?
by Zeokat (Novice) on Dec 26, 2007 at 23:47 UTC
    The code works verrrrrrry good eserte. Big thanks. But new question arrive to my head, are there any way to know if the server have the abbility of "Accept-Ranges: bytes" ?? Thanks in advance.
[reply]
      Try fetching with HEAD instead of GET to view the Accept* headers without getting the content itself
[reply]

In Section Seekers of Perl Wisdom