Beefy Boxes and Bandwidth Generously Provided by pair Networks
"be consistent"
 
PerlMonks  

403 forbidden lwp proxy https

by gabrielsousa (Sexton)
on Oct 06, 2017 at 15:51 UTC ( #1200838=perlquestion: print w/replies, xml ) Need Help??
gabrielsousa has asked for the wisdom of the Perl Monks concerning the following question:

i get 403 forbidden when trying to GET a request using https proxy
use warnings; use strict; use HTTP::Response; use LWP::UserAgent; use LWP::Debug qw(+); use HTTP::Request; use JSON; use Data::Dumper; use DateTime; my ($ua,$url,$req,$res,$mail,$decode,$code,$jsond,$date,$startsec,$fin +ishsec,$diffsec); $mail = 'https://outlook.office365.com/api/v1.0/users/monitor@redoute. +pt/messages/?$select=Sender,Subject'; $ua = LWP::UserAgent->new(keep_alive => 1,); $ua->agent('Mozilla/5.0'); $ua->proxy(['https'], "http://172.25.193.52:8080"); $ua->timeout(1); $req = HTTP::Request->new(GET => $mail); $req->authorization_basic('login','pass'); $req->header(Host => 'outlook.office365.com'); $res = $ua->request($req); print STDERR ("[DEBUG]: RESPONSE =" .Dumper \$res );

Replies are listed 'Best First'.
Re: 403 forbidden lwp proxy https
by gabrielsousa (Sexton) on Oct 06, 2017 at 18:00 UTC
    found the solution
    use LWP::Protocol::connect; $ua->proxy(['https'], "connect://172.25.193.52:8080");

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: perlquestion [id://1200838]
Front-paged by Corion
help
Chatterbox?
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others taking refuge in the Monastery: (6)
As of 2017-10-24 05:09 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    My fridge is mostly full of:

















    Results (286 votes). Check out past polls.

    Notices?