Beefy Boxes and Bandwidth Generously Provided by pair Networks
Don't ask to ask, just ask
 
PerlMonks  

Re^3: Cookie protected web page and file downloading

by reTard (Sexton)
on Jun 03, 2005 at 03:00 UTC ( #463084=note: print w/ replies, xml ) Need Help??


in reply to Re^2: Cookie protected web page and file downloading
in thread Cookie protected web page and file downloading

Yay! Thank you!!

This almost works now!

I can see the link to the file I want to download now but I'm now sure how to reference it.

'last_uri' => 'http://www-912.ibm.com/eserver/support +/fixinfo/download?file=LatestFixData53', 'uri' => 'http://www-912.ibm.com/eserver/support/fixi +nfo/download?file=LatestFixData53',

How do I save this? I've looked at lwp-download but that only confused me more.
Thanks


Comment on Re^3: Cookie protected web page and file downloading
Download Code
Re^4: Cookie protected web page and file downloading
by reTard (Sexton) on Jun 03, 2005 at 03:20 UTC
    I know it's bad form to be replying to my own posts but this is fixed now thanks to a work mate.

    The final code is:

    use Data::Dumper; use WWW::Mechanize; my $mech = WWW::Mechanize->new( cookie_jar => {}, agent => "WWW-Mechanize/0.01", protocols_allowed => ['http','https'], protocols_forbidden => [undef], autocheck => 1); $url = 'http://www.ibm.com/servers/eserver/support/pseries/aixfixes.ht +ml'; $mech->proxy('http','http://PROXY/'); $mech->get( $url ); #print Dumper $mech; $mech->follow_link( text_regex => qr/More fix services/) or die; #print Dumper $mech; $mech->follow_link( text_regex => qr/AIX 5.3/) or die; #print Dumper $mech; $mech->follow_link( text_regex => qr/Data file for AIX 5.3/) or die; #print Dumper $mech; $mech->get('http://www-912.ibm.com/eserver/support/fixinfo/download?fi +le=LatestFixData53'); print $mech->content;

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others meditating upon the Monastery: (13)
As of 2014-07-25 16:53 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    My favorite superfluous repetitious redundant duplicative phrase is:









    Results (174 votes), past polls