Beefy Boxes and Bandwidth Generously Provided by pair Networks
more useful options

Re: Using LWP Proxy and Client Certificate Connection timeout

by Khen1950fx (Canon)
on Feb 12, 2013 at 11:52 UTC ( #1018339=note: print w/replies, xml ) Need Help??

in reply to Using LWP Proxy and Client Certificate Connection timeout

Try it like this:
#!/usr/bin/perl -l use strict; use warnings; use HTTP::Headers; use HTTP::Request; use LWP::UserAgent; my $https_proxy; my $url = ''; my $ua = LWP::UserAgent->new( verify_hostname => 0, SSL_ca_file => 'cert.dat', ); $ua->timeout(10); $ua->agent(""); $ua->proxy( 'https', $https_proxy ); my $h = HTTP::Headers->new(); $h->proxy_authorization_basic( 'user', 'password' ); my $req = HTTP::Request->new( GET => $url ); my $res = $ua->request($req); print "header ----" . $res->headers_as_string; print "response ---" . $res->as_string;

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1018339]
[choroba]: (well, it comes from the 14th century, so labelling it as "modern" doesn't seem appropriate)
[Your Mother]: "They" is becoming accepted but it irritates me sometimes. I tend to just pick she or he randomly or try to use "one."
LanX thinks it is appropriate here :)
[Your Mother]: They would think so.
[jdporter]: ok, I need a recipe for piping lines "through" an external program which is itself a filter
[jdporter]: without using a tmp file
[1nickt]: tobyink perl -MTypes::Standard= is_Int -Mstrict -wE 'say 1 if is_Int 1.0'
[jdporter]: so that I can use the existing expand unix util. Otherwise, I'll probably use Text::Tabs.
[1nickt]: pryrt I guess I don;t really care if user 42 logs on as 42.0 ... more of an academic question at this point.
[LanX]: jdporter: open PIPE,'-|' ?

How do I use this? | Other CB clients
Other Users?
Others contemplating the Monastery: (13)
As of 2017-05-24 20:24 GMT
Find Nodes?
    Voting Booth?