LWP::Authen::Wsse - Library for enabling X-WSSE authentication in LWP
This document describes version 0.05 of LWP::Authen::Wsse, released December 27, 2005.
use LWP::UserAgent; use HTTP::Request::Common; my $url = 'http://www.example.org/protected_page.html'; # Set up the WSSE client my $ua = LWP::UserAgent->new; $ua->credentials('example.org', '', 'username', 'password'); $request = GET $url; print "--Performing request now...-----------\n"; $response = $ua->request($request); print "--Done with request-------------------\n"; if ($response->is_success) { print "It worked!->", $response->code, "\n"; } else { print "It didn't work!->", $response->code, "\n"; }
LWP::Authen::Wsse allows LWP to authenticate against servers that are using the X-WSSE authentication scheme, as required by the Atom Authentication API.
LWP::Authen::Wsse
X-WSSE
The module is used indirectly through LWP, rather than including it directly in your code. The LWP system will invoke the WSSE authentication when it encounters the authentication scheme while attempting to retrieve a URL from a server.
You also need to set the credentials on the UserAgent object like this:
$ua->credentials('www.company.com:80', '', "username", "password");
Alternatively, you may also subclass LWP::UserAgent and override the get_basic_credentials() method. See LWP::UserAgent for more details.
get_basic_credentials()
LWP, LWP::UserAgent, lwpcook.
Audrey Tang <audrey@audrey.org>
Copyright 2004, 2005 by Audrey Tang <audrey@audrey.org>.
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
See http://www.perl.com/perl/misc/Artistic.html
To install LWP::Authen::Wsse, copy and paste the appropriate command in to your terminal.
cpanm
cpanm LWP::Authen::Wsse
CPAN shell
perl -MCPAN -e shell install LWP::Authen::Wsse
For more information on module installation, please visit the detailed CPAN module installation guide.