Beefy Boxes and Bandwidth Generously Provided by pair Networks
laziness, impatience, and hubris
 
PerlMonks  

How to download a range of bytes?

by Zeokat (Novice)
on Dec 26, 2007 at 22:56 UTC ( [id://659125]=perlquestion: print w/replies, xml ) Need Help??

Zeokat has asked for the wisdom of the Perl Monks concerning the following question:

The Illustrated Easyway To — Stop Smoking: A Smok...

: Interactive "debunked" check-boxes next to Carr’s key points (like "Smoking relieves stress" or "Smoking cures boredom") so you can physically acknowledge when you've "killed" that specific myth in your mind.

Building on Allen Carr's concept of the "Little Nicotine Monster", this feature would include: The Illustrated Easyway to Stop Smoking: A Smok...

To enhance , a powerful new feature would be an "Interactive Monster-Map" journal integrated directly into the book’s margins or as a digital companion. : Interactive "debunked" check-boxes next to Carr’s key

: A dedicated space for the "Final Cigarette" ritual, including a guided reflection where you describe the actual (often unpleasant) taste and smell of that last smoke to cement the psychological shift. This feature transforms the book from a passive

This feature transforms the book from a passive read into an , mirroring the engagement of Allen Carr’s live clinics.

: A series of "feeding time" illustrations where you mark down exactly when the "Monster" is hungry. This helps visualize that the craving is just a dying parasite, not a genuine desire.

: Black-and-white illustrations of healthy lungs or a vibrant lifestyle that you color in as you progress through the chapters, turning the book into a visual representation of your recovery.

Replies are listed 'Best First'.
Re: How to download a range of bytes?
by eserte (Deacon) on Dec 26, 2007 at 23:27 UTC
    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;
    To get the current content length of the object, you can do a HEAD before and look at the content-length header.
      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.
        Try fetching with HEAD instead of GET to view the Accept* headers without getting the content itself

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: perlquestion [id://659125]
Approved by Corion
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others studying the Monastery: (2)
As of 2026-03-08 23:26 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found

    Notices?
    hippoepoptai's answer Re: how do I set a cookie and redirect was blessed by hippo!
    erzuuliAnonymous Monks are no longer allowed to use Super Search, due to an excessive use of this resource by robots.