Beefy Boxes and Bandwidth Generously Provided by pair Networks
good chemistry is complicated,
and a little bit messy -LW
 
PerlMonks  

Re: Ok I'm stumped. How the heck does LWP::Authen::Wsse work?

by Khen1950fx (Canon)
on Apr 29, 2011 at 04:32 UTC ( #901921=note: print w/ replies, xml ) Need Help??


in reply to Ok I'm stumped. How the heck does LWP::Authen::Wsse work?

I was stumped at first glance too, but the main problem that I encountered was

$mech->credentials('username', 'password');
Using 'perlmonks.net', I rearranged it to fit the Wsse:
$mech->credentials('perlmonks.net', '', 'username' 'password');
That worked for me, and here's the script as I ran it:
#!/usr/bin/perl use strict; use warnings; use WWW::Mechanize; use Data::Dumper::Concise; my $url = 'http://www.perlmonks.net/?node_id=109'; my $mech = WWW::Mechanize->new; $mech->credentials('perlmonks.net', '', 'username', 'password'); $mech->default_header('Accept-Encoding' => scalar HTTP::Message::decod +able()); $mech->add_handler("request_send", sub { shift->dump; return }); $mech->add_handler("response_done", sub { shift->dump; return }); print Dumper($mech->get($url));


Comment on Re: Ok I'm stumped. How the heck does LWP::Authen::Wsse work?
Select or Download Code
Re^2: Ok I'm stumped. How the heck does LWP::Authen::Wsse work?
by Anonymous Monk on Apr 29, 2011 at 06:19 UTC
    That worked for me, and here's the script as I ran it:

    Seeing how perlmonks doesn't use basic authentication or Wsse, why post nonsense like that?

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others avoiding work at the Monastery: (13)
As of 2014-12-19 17:46 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    Is guessing a good strategy for surviving in the IT business?





    Results (90 votes), past polls