Beefy Boxes and Bandwidth Generously Provided by pair Networks
Keep It Simple, Stupid
 
PerlMonks  

http digest auth

by zogness (Initiate)
on Mar 06, 2007 at 18:04 UTC ( [id://603470]=perlquestion: print w/replies, xml ) Need Help??

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

I need to grab images off a site (similar to cricket) that uses http digest authentication. Below is all I have. It spits the error:
"LWP::UserAgent::request: Simple response: Internal Server Error"
(report:H4ckP4s5 would be the username/password)
------------------------------------------------------
#!/usr/bin/perl -l use strict; use WWW::Mechanize; use Crypt::SSLeay; use HTTP::Cookies; use LWP::Debug qw(+); my $outfile = "out.htm"; my $url = "https://report:H4ckP4s5\@colomanager\.\/stats\/cg i\?sid\=1242418655166\&area=recent\&action=frame\&width=1135\&id=57669 +7218059\&" ; #my $username = "ps-report"; #my $password = "Hack.2ae"; my $mech = WWW::Mechanize->new(); $mech->cookie_jar(HTTP::Cookies->new()); $mech->get($url); my $output_page = $mech->content(); open(OUTFILE, ">$outfile"); print OUTFILE "$output_page"; close(OUTFILE); <br>
------------------------------------------------

Replies are listed 'Best First'.
Re: http digest auth
by scorpio17 (Canon) on Mar 06, 2007 at 18:50 UTC
    Try adding this:
    $mech->credentials($username, $password)
Re: http digest auth
by ikegami (Patriarch) on Mar 06, 2007 at 19:57 UTC

    Only $, @, \ and the end delimiter (" in this case) need to escaped in double-quoted strings.
    my $url = "https://colomanager\.\/stats\/cgi\?sid\=1242418655166\&area=recent\&action=frame\&width=1135\&id=576697218059\&";
    can be written more readably as
    my $url = "https://colomanager./stats/cgi?sid=1242418655166&area=recent&action=frame&width=1135&id=576697218059&";

Log In?
Username:
Password:

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

How do I use this?Last hourOther CB clients
Other Users?
Others making s'mores by the fire in the courtyard of the Monastery: (3)
As of 2024-03-29 05:12 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found