diff options
Diffstat (limited to 'Master/tlpkg/tlperl/site/lib/libwww/lwpcook.pod')
-rw-r--r-- | Master/tlpkg/tlperl/site/lib/libwww/lwpcook.pod | 12 |
1 files changed, 7 insertions, 5 deletions
diff --git a/Master/tlpkg/tlperl/site/lib/libwww/lwpcook.pod b/Master/tlpkg/tlperl/site/lib/libwww/lwpcook.pod index 43af716db06..b4d4989a6a0 100644 --- a/Master/tlpkg/tlperl/site/lib/libwww/lwpcook.pod +++ b/Master/tlpkg/tlperl/site/lib/libwww/lwpcook.pod @@ -97,7 +97,7 @@ operation is to access a WWW form application: $ua = LWP::UserAgent->new; my $req = HTTP::Request->new( - POST => 'http://rt.cpan.org/Public/Dist/Display.html'); + POST => 'https://rt.cpan.org/Public/Dist/Display.html'); $req->content_type('application/x-www-form-urlencoded'); $req->content('Status=Active&Name=libwww-perl'); @@ -112,7 +112,7 @@ suitable default for the content_type: use LWP::UserAgent; $ua = LWP::UserAgent->new; - my $req = POST 'http://rt.cpan.org/Public/Dist/Display.html', + my $req = POST 'https://rt.cpan.org/Public/Dist/Display.html', [ Status => 'Active', Name => 'libwww-perl' ]; print $ua->request($req)->as_string; @@ -185,7 +185,9 @@ program for an example of this. Some sites like to play games with cookies. By default LWP ignores cookies provided by the servers it visits. LWP will collect cookies -and respond to cookie requests if you set up a cookie jar. +and respond to cookie requests if you set up a cookie jar. LWP doesn't +provide a cookie jar itself, but if you install L<HTTP::CookieJar::LWP>, +it can be used like this: use LWP::UserAgent; use HTTP::CookieJar::LWP; @@ -258,7 +260,7 @@ name): $ua = LWP::UserAgent->new; my $req = HTTP::Request->new(GET => - 'http://www.cpan.org/authors/Gisle_Aas/libwww-perl-6.02.tar.gz'); + 'http://www.cpan.org/CPAN/authors/id/O/OA/OALDERS/libwww-perl-6.26.tar.gz'); $res = $ua->request($req, "libwww-perl.tar.gz"); if ($res->is_success) { print "ok\n"; @@ -273,7 +275,7 @@ argument is a code reference): use LWP::UserAgent; $ua = LWP::UserAgent->new; - $URL = 'ftp://ftp.unit.no/pub/rfc/rfc-index.txt'; + $URL = 'ftp://ftp.isc.org/pub/rfc/rfc-index.txt'; my $expected_length; my $bytes_received = 0; |