Beefy Boxes and Bandwidth Generously Provided by pair Networks
We don't bite newbies here... much
 
PerlMonks  

Re: LWP Upload a file with a progress indicator

by beauregard (Monk)
on Mar 04, 2005 at 13:46 UTC ( #436570=note: print w/ replies, xml ) Need Help??


in reply to LWP Upload a file with a progress indicator

I've done a bit of work with this.. The basic idea is:

$HTTP::Request::Common::DYNAMIC_FILE_UPLOAD = 1; my $req = make_http_request(); my $gen = $req->content(); die unless ref($gen) eq "CODE"; $req->content( sub { my $chunk = &$gen(); print "." x (length($chunk)/1024) if defined $chunk; return $chunk; } ); my $res = $ua->request($req);
This snippet will spit out a period for, more or less, each kilobyte uploaded. That's the theory. I've found that this isn't entirely reliable for every LWP implementation I've tried (not many, either).

c.


Comment on Re: LWP Upload a file with a progress indicator
Download Code
Re^2: LWP Upload a file with a progress indicator
by zentara (Archbishop) on Mar 04, 2005 at 13:56 UTC
    Thanks, that's just the kind of thing I needed to get me going. The Flickr-Upload is pretty new, I'll have to check it out.

    I'm not really a human, but I play one on earth. flash japh
Re^2: LWP Upload a file with a progress indicator
by Anonymous Monk on Nov 25, 2007 at 11:02 UTC
    How can this acutally be used to resume a upload?
      you need ftp server

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://436570]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others browsing the Monastery: (17)
As of 2014-09-17 17:00 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    How do you remember the number of days in each month?











    Results (92 votes), past polls