O
one man army
Hi All-
I am an infrequent user of Perl, but have succeeded in a few endeavors.
I have a script that reads data from a series of web pages. But now I
want to modify it to handle an HTTPS page.
I looked briefly in UserAgent.pm, most of the code is beyond my skill
level. I found the lines:
use Carp ();
if ($ENV{PERL_LWP_USE_HTTP_10}) {
require LWP:rotocol::http10;
LWP:rotocol::implementor('http', 'LWP:rotocol::http10');
eval {
require LWP:rotocol::https10;
LWP:rotocol::implementor('https', 'LWP:rotocol::https10');
};
}
And there is an option described, $ua->protocols_allowed(). So I added
the following line after init'ing my $ua
$ua->protocols_allowed( [ 'http', 'https'] ); # to set
Alas, still an error connecting to the page. The very same urls pasted
in to Firefox result in no error.
What to do?
thanks much
I am an infrequent user of Perl, but have succeeded in a few endeavors.
I have a script that reads data from a series of web pages. But now I
want to modify it to handle an HTTPS page.
I looked briefly in UserAgent.pm, most of the code is beyond my skill
level. I found the lines:
use Carp ();
if ($ENV{PERL_LWP_USE_HTTP_10}) {
require LWP:rotocol::http10;
LWP:rotocol::implementor('http', 'LWP:rotocol::http10');
eval {
require LWP:rotocol::https10;
LWP:rotocol::implementor('https', 'LWP:rotocol::https10');
};
}
And there is an option described, $ua->protocols_allowed(). So I added
the following line after init'ing my $ua
$ua->protocols_allowed( [ 'http', 'https'] ); # to set
Alas, still an error connecting to the page. The very same urls pasted
in to Firefox result in no error.
What to do?
thanks much