lwp authorization

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

am still getting 401 Authorization Required bt my username and password is ok

my $req = HTTP::Request->new(POST => 'link');
$req->content_type('application/json');
$req->header('Authorization' => "Basic" .encode_base64('cv23gwyzqvur:t
+y7idfphrkl'));
$req->content('{"name":"john deo","country":"ca","email":"joshn@email.
+com")
my $res = $ua->request($req);

if ($res->is_success) {
  print $res->content;
} else {
  print $res->status_line;
}
[download]

Comment on lwp authorization Download Code

Replies are listed 'Best First'.
Re: lwp authorization by haukex (Archbishop) on May 18, 2017 at 12:26 UTC
`$req->header('Authorization' => "Basic" .encode_base64('cv23gwyzqvur:ty7idfphrkl'));` I would suggest that you don't try to set your own headers, have a look at the LWP::UserAgent docs for the `credentials` method instead, e.g.: `$ua->credentials("www.example.com:80", "Some Realm", "foo", "secret");` [download] Note that if you wanted to debug this, one way would be to use Wireshark to capture both a successful authentication via the browser and a failed one from your script.	[reply] [d/l] [select]
Re^2: lwp authorization by bigup401 (Pilgrim) on May 18, 2017 at 13:10 UTC
i know this method but cant use `$ua->credentials("www.example.com:80", "Some Realm", "foo", "secret");` [download] and gain post request to other url, its single request link	[reply] [d/l]
Re: lwp authorization by hippo (Bishop) on May 18, 2017 at 12:50 UTC
`$req->header('Authorization' => "Basic" .encode_base64('cv23gwyzqvur:ty7idfphrkl'));` That does not match the HTTP/1.1 Basic Auth spec. Like haukex I cannot see why you have chosen not to use the already-available convenience method to achieve this. Can you explain your choice?	[reply] [d/l]
Re^2: lwp authorization by bigup401 (Pilgrim) on May 18, 2017 at 13:13 UTC
because the api documentations tells me . authenticate by encoding your username and password to Base64 HTTP Basic Authorization	[reply]
Re^3: lwp authorization by poj (Abbot) on May 18, 2017 at 13:54 UTC
`# \| space # V $req->header('Authorization' => "Basic " .encode_base64('cv23gwyzqvur: +t +y7idfphrkl'));` [download] poj	[reply] [d/l]
Re^4: lwp authorization by bigup401 (Pilgrim) on May 18, 2017 at 16:18 UTC
A reply falls below the community's threshold of quality. You may see it by logging in.
Re: lwp authorization by Mr. Muskrat (Canon) on May 18, 2017 at 17:04 UTC
If you are not willing to try what haukex, hippo and poj suggested then why did you bother to ask for help? Update: I forgot to include hippo initially.	[reply]
Re^2: lwp authorization by bigup401 (Pilgrim) on May 18, 2017 at 19:27 UTC
i tried it and fail i solved it. it was host problem	[reply]


Your skill will accomplish what the force of many cannot
	PerlMonks